From c8ce0d5c2bd4b35187f182580c0566c440b17950 Mon Sep 17 00:00:00 2001
From: John Whitington <john@coherentgraphics.co.uk>
Date: Sat, 8 Jan 2022 16:20:26 +0000
Subject: [PATCH] more

---
 cpdfcommand.ml | 1 +
 cpdfimpose.ml  | 2 --
 2 files changed, 1 insertion(+), 2 deletions(-)

diff --git a/cpdfcommand.ml b/cpdfcommand.ml
index 5e42c13..520d747 100644
--- a/cpdfcommand.ml
+++ b/cpdfcommand.ml
@@ -1272,6 +1272,7 @@ let set_input s =
 
 let set_json_input s =
   args.original_filename <- s;
+  args.create_objstm <- true;
   let fh = open_in_bin s in
   let pdf = Cpdfjson.of_input (Pdfio.input_of_channel fh) in
     close_in fh;
diff --git a/cpdfimpose.ml b/cpdfimpose.ml
index be0e1de..3dce589 100644
--- a/cpdfimpose.ml
+++ b/cpdfimpose.ml
@@ -118,8 +118,6 @@ let impose_transforms fit fx fy columns rtl btt center margin mediabox output_me
     done;
   map (if fit then make_margin output_mediabox margin else Fun.id) (rev !trs)
 
-(* Combine two pages into one throughout the document. The pages have already
-had their objects renumbered so as not to clash. *)
 let impose_pages fit x y columns rtl btt center margin output_mediabox fast fit_extra_hspace fit_extra_vspace pdf = function
   | [] -> assert false
   | (h::_) as pages ->