fenix/cpdf-source
1
0
Fork 0
mirror of https://github.com/johnwhitington/cpdf-source.git synced 2025-06-05 22:09:39 +02:00
Code Issues Packages Projects Releases Wiki Activity

more

Browse Source
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
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