The Arg module of OCaml does not support hiding options from the --help
output: hence, mark --short-options and --long-options as internal
options, since we need them only for the bash completion scripts.
---
 mllib/common_utils.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/mllib/common_utils.ml b/mllib/common_utils.ml
index 3d6eb94..db8a298 100644
--- a/mllib/common_utils.ml
+++ b/mllib/common_utils.ml
@@ -575,8 +575,8 @@ let set_standard_options argspec =
   let set_debug_gc () =
     at_exit (fun () -> Gc.compact()) in
   let argspec = [
-    "--short-options", Arg.Unit display_short_options, " " ^ s_"List short 
options";
-    "--long-options", Arg.Unit display_long_options, " " ^ s_"List long 
options";
+    "--short-options", Arg.Unit display_short_options, " " ^ s_"List short 
options (internal)";
+    "--long-options", Arg.Unit display_long_options, " " ^ s_"List long 
options (internal)";
     "-V",           Arg.Unit print_version_and_exit,
                                                " " ^ s_"Display version and 
exit";
     "--version",    Arg.Unit print_version_and_exit,
-- 
2.5.5

_______________________________________________
Libguestfs mailing list
[email protected]
https://www.redhat.com/mailman/listinfo/libguestfs

Reply via email to