[Libguestfs] [PATCH 1/3] mllib: make few command line options stuff private

Pino Toscano ptoscano at redhat.com
Tue Sep 1 14:40:12 UTC 2015


Make print_version_and_exit, long_options, display_short_options, and
display_long_options private, as set_standard_options now takes care of
handling the job for the common command line options.
---
 mllib/common_utils.mli | 10 ----------
 1 file changed, 10 deletions(-)

diff --git a/mllib/common_utils.mli b/mllib/common_utils.mli
index 79032bc..24f8f83 100644
--- a/mllib/common_utils.mli
+++ b/mllib/common_utils.mli
@@ -90,10 +90,6 @@ val info : ('a, unit, string, unit) format4 -> 'a
 val run_main_and_handle_errors : (unit -> unit) -> unit
 (** Common function for handling pretty-printing exceptions. *)
 
-val print_version_and_exit : unit -> unit
-(** Print the version number and exit.  Implements [--version] flag in
-    the OCaml tools. *)
-
 val generated_by : string
 (** The string "generated by <prog> <version>". *)
 
@@ -116,12 +112,6 @@ val skip_dashes : string -> string
 val compare_command_line_args : string -> string -> int
 (** Compare command line arguments for equality, ignoring any leading [-]s. *)
 
-val long_options : (Arg.key * Arg.spec * Arg.doc) list ref
-val display_short_options : unit -> 'a
-(** Implements [--short-options]. *)
-val display_long_options : unit -> 'a
-(** Implements [--long-options]. *)
-
 val set_standard_options : (Arg.key * Arg.spec * Arg.doc) list -> (Arg.key * Arg.spec * Arg.doc) list
 (** Adds the standard libguestfs command line options to the specified ones,
     sorting them, and setting [long_options] to them.
-- 
2.1.0




More information about the Libguestfs mailing list