fenix
/
cpdf-source
mirror of https://github.com/johnwhitington/cpdf-source.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Nulls for JSON font entries

This commit is contained in:
John Whitington 2023-11-08 11:36:34 +00:00
parent 8a1fdc23a4
commit 51926ffd20
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
cpdffont.ml
View File

@ -290,9 +290,9 @@ let json_of_font (pagenum, name, subtype, basefont, encoding) =
`Assoc `Assoc
[("page", `Int pagenum); [("page", `Int pagenum);
("name", `String name); ("name", `String name);
("subtype", `String subtype); ("subtype", if subtype = "" then `Null else `String subtype);
("basefont", `String basefont); ("basefont", if basefont = "" then `Null else `String basefont);
("encoding", `String encoding)] ("encoding", if encoding = "" then `Null else `String encoding)]
let print_fonts ?(json=false) pdf range = let print_fonts ?(json=false) pdf range =
if json if json