X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=diskzip%2Fdiskzip.ml;fp=diskzip%2Fdiskzip.ml;h=f8d58b411adb9e8a26797858bd190fb7d83979a2;hb=94b4d762109604f4fafface50c44baf3f70a4034;hp=d857681adbeb829fc3d92338c2edbb5457e5114c;hpb=0b2bee9a672e5884f17ef231daf12daa89c26126;p=virt-df.git

diff --git a/diskzip/diskzip.ml b/diskzip/diskzip.ml
index d857681..f8d58b4 100644
--- 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,
-      "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),