From 999de23f8219dd169b74d95b90f1811468984594 Mon Sep 17 00:00:00 2001
From: John Whitington <john@coherentgraphics.co.uk>
Date: Tue, 28 Mar 2023 15:39:52 +0100
Subject: [PATCH] more

---
 cpdfimpose.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/cpdfimpose.ml b/cpdfimpose.ml
index a549f46..2374f30 100644
--- a/cpdfimpose.ml
+++ b/cpdfimpose.ml
@@ -128,7 +128,7 @@ let impose_pages fit x y columns rtl btt center margin output_mediabox fast fit_
      in
        (* Change the pattern matrices before combining resources *)
        let pages, h =
-         let r = map2 (fun p t -> Cpdfpage.change_pattern_matrices_page pdf t p) pages transforms in
+         let r = map2 (fun p t -> Cpdfpage.change_pattern_matrices_page pdf (Pdftransform.matrix_invert t) p) pages transforms in
            (r, List.hd r)
        in
      let resources' = pair_reduce (Pdfpage.combine_pdf_resources pdf) (map (fun p -> p.Pdfpage.resources) pages) in