git.annexia.org
/
virt-df.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
0b2bee9
)
Fix usage.
author
Richard W.M. Jones
<rjones@redhat.com>
Mon, 28 Apr 2008 12:00:33 +0000
(13:00 +0100)
committer
Richard W.M. Jones
<rjones@redhat.com>
Mon, 28 Apr 2008 12:00:33 +0000
(13:00 +0100)
diskzip/diskzip.ml
patch
|
blob
|
history
diff --git
a/diskzip/diskzip.ml
b/diskzip/diskzip.ml
index
d857681
..
f8d58b4
100644
(file)
--- a/
diskzip/diskzip.ml
+++ b/
diskzip/diskzip.ml
@@
-86,9
+86,9
@@
let rec main () =
"-j", Arg.Unit (set_extcompress BZip2),
" " ^ s_"Pipe the output/input through bzip2";
"-o", Arg.String set_output,
"-j", Arg.Unit (set_extcompress BZip2),
" " ^ s_"Pipe the output/input through bzip2";
"-o", Arg.String set_output,
- "path" ^ s_"Set the output filename or directory name";
+ "path
" ^ s_"Set the output filename or directory name";
"-p", Arg.String (fun prog -> set_extcompress (External prog) ()),
"-p", Arg.String (fun prog -> set_extcompress (External prog) ()),
- "prog" ^ s_"Pipe the output/input through external program";
+ "prog
" ^ s_"Pipe the output/input through external program";
"--version", Arg.Unit version,
" " ^ s_"Display version and exit";
"-z", Arg.Unit (set_extcompress GZip),
"--version", Arg.Unit version,
" " ^ s_"Display version and exit";
"-z", Arg.Unit (set_extcompress GZip),