line endings
This commit is contained in:
parent
5cc462180a
commit
b1f8426f87
|
@ -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;
|
||||
|
|
Loading…
Reference in New Issue