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

more

Browse Source
This commit is contained in:
John Whitington 2023-05-04 15:02:21 +01:00
parent 04b395a526
commit 202f364b4f
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
cpdfdraw.ml
View File

@ -149,6 +149,7 @@ let rec ops_of_drawop pdf endpage filename bates batespad num page = function
let o = Pdftext.write_font pdf (Pdftext.StandardFont (s, Pdftext.WinAnsiEncoding)) in let o = Pdftext.write_font pdf (Pdftext.StandardFont (s, Pdftext.WinAnsiEncoding)) in
let n = fresh_name "/F" in let n = fresh_name "/F" in
Hashtbl.add res.fonts n o; Hashtbl.add res.fonts n o;
res.current_font <- (Pdftext.StandardFont (s, Pdftext.WinAnsiEncoding));
[Pdfops.Op_Tf (n, f)] [Pdfops.Op_Tf (n, f)]
| BT -> [Pdfops.Op_BT] | BT -> [Pdfops.Op_BT]
| ET -> [Pdfops.Op_ET] | ET -> [Pdfops.Op_ET]