more
This commit is contained in:
parent
126530a2de
commit
cd4c16e6fb
|
@ -3745,10 +3745,13 @@ let go () =
|
|||
match args.inputs with
|
||||
| (InFile inname, _, _, _, _, _)::_ -> inname
|
||||
| _ -> ""
|
||||
in
|
||||
let fontname =
|
||||
match embedinfo with Some (_, _, fontname, _) -> fontname | None -> args.fontname
|
||||
in
|
||||
write_pdf false
|
||||
(Cpdfaddtext.addtexts
|
||||
?embedinfo args.linewidth args.outline args.fast args.fontname
|
||||
?embedinfo args.linewidth args.outline args.fast fontname
|
||||
font args.bates args.batespad args.color args.position
|
||||
args.linespacing args.fontsize args.underneath text range
|
||||
args.relative_to_cropbox args.opacity
|
||||
|
|
Loading…
Reference in New Issue