mirror of
https://github.com/johnwhitington/cpdf-source.git
synced 2025-02-16 11:50:54 +01:00
remove debug printing
This commit is contained in:
parent
43a0109306
commit
d5fbac57f9
@ -357,7 +357,6 @@ let addtext
|
|||||||
let newresources =
|
let newresources =
|
||||||
match fontpack with
|
match fontpack with
|
||||||
| Some fontpack ->
|
| Some fontpack ->
|
||||||
Printf.printf "New resources: a fontpack!\n";
|
|
||||||
let newfontdict =
|
let newfontdict =
|
||||||
let fd = ref fontdict in
|
let fd = ref fontdict in
|
||||||
iter2
|
iter2
|
||||||
@ -369,7 +368,6 @@ let addtext
|
|||||||
in
|
in
|
||||||
Pdf.add_dict_entry resources' "/Font" newfontdict
|
Pdf.add_dict_entry resources' "/Font" newfontdict
|
||||||
| None ->
|
| None ->
|
||||||
Printf.printf "New resources: no fontpack!\n";
|
|
||||||
match font with
|
match font with
|
||||||
| Some (Pdftext.StandardFont _ as font) ->
|
| Some (Pdftext.StandardFont _ as font) ->
|
||||||
let newfontdict =
|
let newfontdict =
|
||||||
|
Loading…
x
Reference in New Issue
Block a user