mirror of
https://github.com/johnwhitington/cpdf-source.git
synced 2025-02-17 20:30:52 +01:00
more
This commit is contained in:
parent
5f83c581f7
commit
5c05d80b6b
@ -313,7 +313,7 @@ let draw_single ~filename ~bates ~batespad fast range pdf drawops =
|
|||||||
in
|
in
|
||||||
let pdf = ref pdf in
|
let pdf = ref pdf in
|
||||||
iter2
|
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)
|
(ilist 1 endpage)
|
||||||
ss;
|
ss;
|
||||||
let pdf = !pdf in
|
let pdf = !pdf in
|
||||||
|
Loading…
x
Reference in New Issue
Block a user