mirror of
https://github.com/johnwhitington/cpdf-source.git
synced 2025-06-05 22:09:39 +02:00
more
This commit is contained in:
@ -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
|
||||
|
Reference in New Issue
Block a user