fenix/cpdf-source
1
0
Fork 0
mirror of https://github.com/johnwhitington/cpdf-source.git synced 2025-06-05 22:09:39 +02:00
Code Issues Packages Projects Releases Wiki Activity

more

Browse Source
This commit is contained in:
John Whitington
2023-05-11 14:39:37 +01:00
parent f78b5807f8
commit 4e52b75f72
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
cpdfdraw.ml
View File

@ -307,7 +307,7 @@ let draw ~filename ~bates ~batespad fast range pdf drawops =
let pdf = ref pdf in
let range = ref range in
(* Double up a trailing NewPage so it actually does something... *)
let drawops = match rev drawops with NewPage::t -> rev (NewPage::NewPage::t) | l -> l in
let drawops = match rev drawops with NewPage::t -> rev (NewPage::NewPage::t) | _ -> drawops in
let chunks = ref (split_around (eq NewPage) drawops) in
while !chunks <> [] do
reset_state ();