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-21 17:52:15 +01:00
parent 256a74bd0f
commit 81b9bf49a6
1 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
cpdftexttopdf.ml
View File

@@ -28,6 +28,8 @@ let rec of_utf8_with_newlines charcode_extractor t =
if c <> [] then items := Text (charcodes_of_codepoints c)::!items; if c <> [] then items := Text (charcodes_of_codepoints c)::!items;
rev !items rev !items
(* The optional pdf argument is for providing a pre-embedded font - this will
be removed when we re-embed subsetted? *)
let typeset ?pdf ~papersize ~font ~fontsize text = let typeset ?pdf ~papersize ~font ~fontsize text =
let charcode_extractor = Pdftext.charcode_extractor_of_font_real font in let charcode_extractor = Pdftext.charcode_extractor_of_font_real font in
let pdf = match pdf with None -> Pdf.empty () | Some pdf -> pdf in let pdf = match pdf with None -> Pdf.empty () | Some pdf -> pdf in