X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=utils.mli;h=3e937551fd71924e2d4984f7da888a5eda667f00;hb=c79fc07ff71926b3bf956ff296336f6f71bb3b1e;hp=0df3a437f223a6037b43424d8302f5a509892d94;hpb=b07102fda0034da5840a9f33bd6d404a195b8cc9;p=guestfs-browser.git

diff --git a/utils.mli b/utils.mli
index 0df3a43..3e93755 100644
--- a/utils.mli
+++ b/utils.mli
@@ -35,11 +35,6 @@ val set_verbose_flag : unit -> unit
 
       This is set through the --verbose command line option. *)
 
-val write_flag : unit -> bool
-val set_write_flag : unit -> unit
-  (** Writes are prevented unless the user sets this to [true]
-      through the command line option --write. *)
-
 val debug : ('a, unit, string, unit) format4 -> 'a
   (** A printf-like function for writing debugging messages. *)
 
@@ -48,7 +43,35 @@ val failwith : ('a, unit, string, 'b) format4 -> 'a
       take a printf-like argument list, and also logs errors on stderr
       when verbose is enabled. *)
 
+val trace : unit -> bool
+val set_trace_flag : unit -> unit
+  (** If this contains [true] then calls to libguestfs are traced.
+
+      This is set through the [-x] command line option. *)
+
+val connect_uri : unit -> string option
+val set_connect_uri : string option -> unit
+  (** The libvirt connection URI.
+
+      This is set through the [--connect] command line option. *)
+
 val utf8_rarrow : string (** UTF-8 RIGHTWARDS ARROW *)
 
 val human_size_1k : int64 -> string
   (** Convert a number (of 1K blocks) into a human readable string. *)
+
+val unique : unit -> int
+  (** Return a new integer each time called. *)
+
+val mklabel : string -> GObj.widget
+  (** Convenience function to make a label containing some text.  It is
+      returned as a generic widget. *)
+
+val libguestfs_version_string : unit -> string
+  (** Return the version of libguestfs as a string. *)
+
+val libvirt_version_string : unit -> string
+  (** Return the version of libvirt as a string. *)
+
+val (//) : string -> string -> string
+  (** Concatenate two paths. *)