X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=virt-ctrl%2Fvc_domain_ops.mli;h=38a2015a6d79da61ba2cfd0fd2e1fcc5dffab7ff;hb=0c2134a62abc82f2b558e648cdaea22b098d4bc9;hp=5bfa0b85df53bcd917b43187128d2564d6ca0a0d;hpb=474e8b8e2e98b61d5d01a58f843b9338754ecf2f;p=virt-top.git

diff --git a/virt-ctrl/vc_domain_ops.mli b/virt-ctrl/vc_domain_ops.mli
index 5bfa0b8..38a2015 100644
--- a/virt-ctrl/vc_domain_ops.mli
+++ b/virt-ctrl/vc_domain_ops.mli
@@ -19,7 +19,17 @@
    Domain operations buttons.
 *)
 
-val start_domain : GTree.view -> GTree.tree_store -> Vc_connections.columns -> unit -> unit
-val pause_domain : GTree.view -> GTree.tree_store -> Vc_connections.columns -> unit -> unit
-val resume_domain : GTree.view -> GTree.tree_store -> Vc_connections.columns -> unit -> unit
-val shutdown_domain : GTree.view -> GTree.tree_store -> Vc_connections.columns -> unit -> unit
+type dops_callback_fn =
+    GTree.view -> GTree.tree_store -> Vc_connections.columns -> unit -> unit
+      (** Domain ops callback function type.
+
+	  The parameters are: tree (view), model, columns.
+	  The extra unit parameter is there to make it easier to
+	  turn into a callback.
+      *)
+
+val start_domain : dops_callback_fn
+val pause_domain : dops_callback_fn
+val resume_domain : dops_callback_fn
+val shutdown_domain : dops_callback_fn
+val open_domain_details : dops_callback_fn