more

2023-03-24 22:42:02 +00:00 · 2023-03-24 22:42:02 +00:00 · c0d5180fe9
parent 847f878fa1
commit c0d5180fe9
1 changed files with 1 additions and 0 deletions
--- a/cpdfpage.ml
+++ b/cpdfpage.ml
@ -103,6 +103,7 @@ let xobject_of_page ~fast pdf page =

 let shift_page ?(fast=false) dxdylist pdf pnum page =
  let xobj = xobject_of_page ~fast pdf page in
+  let xobjnum = Pdf.addobj pdf xobj in
  let dx, dy = List.nth dxdylist (pnum - 1) in
    let transform_op =
      Pdfops.Op_cm (Pdftransform.matrix_of_op (Pdftransform.Translate (dx, dy)))