From b1f8426f87f0f0891e5f1f0ea6e1bd2fe609c700 Mon Sep 17 00:00:00 2001
From: John Whitington <john@coherentgraphics.co.uk>
Date: Sat, 11 Dec 2021 13:17:44 +0000
Subject: [PATCH] line endings

---
 cpdftexttopdf.ml | 1 +
 1 file changed, 1 insertion(+)

diff --git a/cpdftexttopdf.ml b/cpdftexttopdf.ml
index 020795b..a5319fe 100644
--- a/cpdftexttopdf.ml
+++ b/cpdftexttopdf.ml
@@ -19,6 +19,7 @@ let rec of_utf8_with_newlines t =
              if c <> "" then items := Cpdftype.Text (explode c)::!items;
              items := Cpdftype.NewLine::!items;
              Buffer.clear buf
+       | '\r' -> ()
        | x ->
            Buffer.add_char buf x)
       t;