From 9a4f6785d321f6e7ec03671c88850f0e267c3c51 Mon Sep 17 00:00:00 2001
From: John Whitington <john@coherentgraphics.co.uk>
Date: Tue, 16 Feb 2021 19:06:26 +0000
Subject: [PATCH] more

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

diff --git a/cpdf.ml b/cpdf.ml
index ca0cdb1..76ef6a4 100644
--- a/cpdf.ml
+++ b/cpdf.ml
@@ -4201,7 +4201,7 @@ and remove_images_page onlyremove boxes pdf page =
             form_xobjects';
         let image_xobjects' =
           match onlyremove with
-            None -> image_xobjects
+            None -> []
           | Some n -> option_map (function (n', _) as xobj -> if n = n' then None else Some xobj) image_xobjects
         in
             let newdict =