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