fenix/cpdf-source
1
0
Fork 0
mirror of https://github.com/johnwhitington/cpdf-source.git synced 2025-06-05 22:09:39 +02:00
Code Issues Packages Projects Releases Wiki Activity

more

Browse Source
This commit is contained in:
John Whitington
2022-09-27 20:10:19 +01:00
parent 7d181bf13d
commit 126530a2de
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
cpdftype.ml
View File

@@ -174,7 +174,7 @@ let paginate tmargin bmargin papersize i =
let make_resources fontobjnums = let make_resources fontobjnums =
Pdf.Dictionary Pdf.Dictionary
[("/Font", Pdf.Dictionary (map (fun fo -> ("/F" ^ string_of_int fo, Pdf.Indirect fo)) fontobjnums))] [("/Font", Pdf.Dictionary (map (fun fo -> ("/F" ^ string_of_int fo, Pdf.Indirect fo)) (setify fontobjnums)))]
let make_annotations annots = let make_annotations annots =
if annots = [] then Pdf.Dictionary [] else if annots = [] then Pdf.Dictionary [] else