mirror of
https://github.com/johnwhitington/cpdf-source.git
synced 2025-06-05 22:09:39 +02:00
Bug with duplicate setproducer and setcreator functions
This commit is contained in:
@ -1210,10 +1210,10 @@ let setsqueeze () =
|
|||||||
args.squeeze <- true;
|
args.squeeze <- true;
|
||||||
args.create_objstm <- true
|
args.create_objstm <- true
|
||||||
|
|
||||||
let setcreator s =
|
let setcreatoraswego s =
|
||||||
args.creator <- Some s
|
args.creator <- Some s
|
||||||
|
|
||||||
let setproducer s =
|
let setproduceraswego s =
|
||||||
args.producer <- Some s
|
args.producer <- Some s
|
||||||
|
|
||||||
let setprepend s =
|
let setprepend s =
|
||||||
@ -2101,10 +2101,10 @@ and specs =
|
|||||||
Arg.String setremovedictentry,
|
Arg.String setremovedictentry,
|
||||||
" Remove an entry from all dictionaries");
|
" Remove an entry from all dictionaries");
|
||||||
("-producer",
|
("-producer",
|
||||||
Arg.String setproducer,
|
Arg.String setproduceraswego,
|
||||||
" Change the /Producer entry in the /Info dictionary");
|
" Change the /Producer entry in the /Info dictionary");
|
||||||
("-creator",
|
("-creator",
|
||||||
Arg.String setcreator,
|
Arg.String setcreatoraswego,
|
||||||
" Change the /Creator entry in the /Info dictionary");
|
" Change the /Creator entry in the /Info dictionary");
|
||||||
("-list-spot-colors",
|
("-list-spot-colors",
|
||||||
Arg.Unit (setop ListSpotColours),
|
Arg.Unit (setop ListSpotColours),
|
||||||
|
Reference in New Issue
Block a user