This commit is contained in:
John Whitington 2022-09-20 15:37:34 +01:00
parent 4349e64d95
commit 8f4e1c01a6
1 changed files with 2 additions and 8 deletions

View File

@ -1,13 +1,7 @@
open Pdfutil open Pdfutil
let of_utf8 (f, fontsize) t = (* FIXME Make this use the charcode extractor for the font, because cpdftype
Pdftext.codepoints_of_utf8 t assumes charcodes. *)
|> option_map (Pdftext.charcode_extractor_of_font_real f)
|> map char_of_int
|> implode
let of_pdfdocencoding (f, fontsize) t =
of_utf8 (f, fontsize) (Pdftext.utf8_of_pdfdocstring t)
let rec of_utf8_with_newlines t = let rec of_utf8_with_newlines t =
let items = ref [] in let items = ref [] in