Implement -underneath and -scale-stamp-to-fit for -combine-pages

This commit is contained in:
John Whitington 2025-03-11 17:02:54 +00:00
parent c47d1a15ff
commit 0d063dca03

View File

@ -4576,7 +4576,7 @@ let go () =
args.fast args.fast
(prerotate (parse_pagespec underpdf "all") underpdf) (prerotate (parse_pagespec underpdf "all") underpdf)
(prerotate (parse_pagespec overpdf "all") overpdf) (prerotate (parse_pagespec overpdf "all") overpdf)
false false) args.scale_stamp_to_fit args.underneath)
| Some Encrypt -> | Some Encrypt ->
let pdf = get_single_pdf args.op false in let pdf = get_single_pdf args.op false in
let pdf = Cpdfsqueeze.recompress_pdf pdf let pdf = Cpdfsqueeze.recompress_pdf pdf