From 79e03887bfdebc911ecb72c86172b419d233ca4e Mon Sep 17 00:00:00 2001
From: John Whitington <john@coherentgraphics.co.uk>
Date: Thu, 24 Nov 2016 16:11:32 +0000
Subject: [PATCH] Use special mode in Pdf.change_pages for combine_pages

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

diff --git a/cpdf.ml b/cpdf.ml
index 468dfe1..937bf12 100644
--- a/cpdf.ml
+++ b/cpdf.ml
@@ -2426,7 +2426,7 @@ let combine_pages (fast : bool) under over scaletofit swap equalize =
              * Pdfpage.change_pages properly. For now, we just use
              * Pdfpage.pdf_of_pages afterward to chop it. *)
             (* See also combine_pages below *)
-            let changed = Pdfpage.change_pages true merged (new_pages @ new_pages) in
+            let changed = Pdfpage.change_pages ~is_combine_pages:true true merged new_pages in
               debug_pdf changed "changed.pdf";
               let cut =
                 Pdfpage.pdf_of_pages ~retain_numbering:true changed (ilist 1 (length new_pages))