Bug with duplicate setproducer and setcreator functions
This commit is contained in:
parent
f3e0c97660
commit
d51ba0dd5e
|
@ -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),
|
||||||
|
|
Loading…
Reference in New Issue