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

more

This commit is contained in:
John Whitington 2023-05-11 16:43:52 +01:00
parent 5f83c581f7
commit 5c05d80b6b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
cpdfdraw.ml
View File

@ -313,7 +313,7 @@ let draw_single ~filename ~bates ~batespad fast range pdf drawops =
in
let pdf = ref pdf in
iter2
(fun n s -> if mem n range then pdf := Cpdftweak.append_page_content s false fast [n] !pdf)
(fun n s -> Printf.printf "Page %i\n%!" n; if mem n range then pdf := Cpdftweak.append_page_content s false fast [n] !pdf)
(ilist 1 endpage)
ss;
let pdf = !pdf in