diff --git a/cpdf.ml b/cpdf.ml
index 68f3ec8..f579616 100644
--- a/cpdf.ml
+++ b/cpdf.ml
@@ -2318,7 +2318,7 @@ let shift_page ?(fast=false) dxdylist pdf pnum page =
       let page =
         change_pattern_matrices_page pdf (Pdftransform.mktranslate ~-.dx ~-.dy) page
       in
-        transform_annotations pdf (Pdftransform.mktranslate ~-.dx ~-.dy) page.Pdfpage.rest;
+        transform_annotations pdf (Pdftransform.mktranslate dx dy) page.Pdfpage.rest;
         Pdfpage.prepend_operators pdf [transform_op] ~fast page
 
 let shift_pdf ?(fast=false) dxdylist pdf range =