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

first destination-scaling success

Browse Source
This commit is contained in:
John Whitington
2021-05-28 18:00:27 +01:00
parent 3073c74367
commit 976f5308af
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
cpdf.ml
View File

@ -2998,9 +2998,9 @@ let scale_pdf ?(fast=false) sxsylist pdf range =
change_pattern_matrices_page pdf (Pdftransform.matrix_invert matrix) page change_pattern_matrices_page pdf (Pdftransform.matrix_invert matrix) page
in in
transform_annotations pdf matrix page.Pdfpage.rest; transform_annotations pdf matrix page.Pdfpage.rest;
Pdfpage.prepend_operators pdf ~fast [transform_op] page (Pdfpage.prepend_operators pdf ~fast [transform_op] page, pnum, matrix)
in in
process_pages (ppstub scale_page) pdf range process_pages scale_page pdf range
(* Scale to fit page of size x * y *) (* Scale to fit page of size x * y *)
let scale_to_fit_pdf ?(fast=false) position input_scale xylist op pdf range = let scale_to_fit_pdf ?(fast=false) position input_scale xylist op pdf range =