fenix
/
cpdf-source
mirror of https://github.com/johnwhitington/cpdf-source.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

more

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
cpdftexttopdf.ml
View File

@ -1,13 +1,7 @@
open Pdfutil
let of_utf8 (f, fontsize) t =
Pdftext.codepoints_of_utf8 t
|> 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)
(* FIXME Make this use the charcode extractor for the font, because cpdftype
assumes charcodes. *)
let rec of_utf8_with_newlines t =
let items = ref [] in