From d5fbac57f9b165072dfa4dd02556fce965c20a31 Mon Sep 17 00:00:00 2001
From: John Whitington <john@coherentgraphics.co.uk>
Date: Fri, 21 Jul 2023 14:28:11 +0100
Subject: [PATCH] remove debug printing

---
 cpdfaddtext.ml | 2 --
 1 file changed, 2 deletions(-)

diff --git a/cpdfaddtext.ml b/cpdfaddtext.ml
index 641c2b5..68d0778 100644
--- a/cpdfaddtext.ml
+++ b/cpdfaddtext.ml
@@ -357,7 +357,6 @@ let addtext
             let newresources =
               match fontpack with
               | Some fontpack ->
-                  Printf.printf "New resources: a fontpack!\n";
                   let newfontdict =
                     let fd = ref fontdict in
                       iter2
@@ -369,7 +368,6 @@ let addtext
                   in
                     Pdf.add_dict_entry resources' "/Font" newfontdict
               | None ->
-                  Printf.printf "New resources: no fontpack!\n";
                   match font with
                   | Some (Pdftext.StandardFont _ as font) ->
                       let newfontdict =