Fix usage.
authorRichard W.M. Jones <rjones@redhat.com>
Mon, 28 Apr 2008 12:00:33 +0000 (13:00 +0100)
committerRichard W.M. Jones <rjones@redhat.com>
Mon, 28 Apr 2008 12:00:33 +0000 (13:00 +0100)
diskzip/diskzip.ml

index d857681..f8d58b4 100644 (file)
@@ -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,
-      "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) ()),
-      "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),