When -debug is specified, print out the args, to help debug shell problems
This commit is contained in:
parent
a2bece3878
commit
d8cdc572bc
|
@ -3667,6 +3667,8 @@ let go () =
|
||||||
write_pdf false pdf
|
write_pdf false pdf
|
||||||
|
|
||||||
let parse_argv () =
|
let parse_argv () =
|
||||||
|
if args.debug then
|
||||||
|
Array.iter (Printf.eprintf "arg: %s\n") Sys.argv;
|
||||||
Arg.parse_argv ~current:(ref 0)
|
Arg.parse_argv ~current:(ref 0)
|
||||||
|
|
||||||
let align_specs s =
|
let align_specs s =
|
||||||
|
|
Loading…
Reference in New Issue