more
This commit is contained in:
parent
e257c1c62b
commit
7408a79186
|
@ -2103,7 +2103,7 @@ let setfont f =
|
||||||
begin match args.op with Some Draw -> addop (Cpdfdraw.FontPack (f, embed_font (), null_hash ())) | _ -> () end
|
begin match args.op with Some Draw -> addop (Cpdfdraw.FontPack (f, embed_font (), null_hash ())) | _ -> () end
|
||||||
|
|
||||||
let loadttf n =
|
let loadttf n =
|
||||||
Printf.printf "loadttf: %s\n" n;
|
(*Printf.printf "loadttf: %s\n" n;*)
|
||||||
let name, filename =
|
let name, filename =
|
||||||
match String.split_on_char '=' n with
|
match String.split_on_char '=' n with
|
||||||
| [name; filename] -> name, filename
|
| [name; filename] -> name, filename
|
||||||
|
|
Loading…
Reference in New Issue