X-Git-Url: http://git.annexia.org/?p=virt-top.git;a=blobdiff_plain;f=virt-ctrl%2Fvc_mainwindow.mli;h=1f3a176c6b2a9eb79bc2a3e87dd75aa02bd01d52;hp=fb7f1527cd0e4b8b6035dd1ab489a0e4a184349e;hb=c296b68c99f8c22b0c7db1b072a6cd86f9ac3da9;hpb=474e8b8e2e98b61d5d01a58f843b9338754ecf2f

diff --git a/virt-ctrl/vc_mainwindow.mli b/virt-ctrl/vc_mainwindow.mli
index fb7f152..1f3a176 100644
--- a/virt-ctrl/vc_mainwindow.mli
+++ b/virt-ctrl/vc_mainwindow.mli
@@ -23,7 +23,8 @@
     callback functions to wire everything up.
 *)
 val make : open_connection:(unit -> unit) ->
-  start_domain:(GTree.view -> GTree.tree_store -> Vc_connections.columns -> unit -> unit) ->
-  pause_domain:(GTree.view -> GTree.tree_store -> Vc_connections.columns -> unit -> unit) ->
-  resume_domain:(GTree.view -> GTree.tree_store -> Vc_connections.columns -> unit -> unit) ->
-  shutdown_domain:(GTree.view -> GTree.tree_store -> Vc_connections.columns -> unit -> unit) -> unit
+  start_domain:Vc_domain_ops.dops_callback_fn ->
+  pause_domain:Vc_domain_ops.dops_callback_fn ->
+  resume_domain:Vc_domain_ops.dops_callback_fn ->
+  shutdown_domain:Vc_domain_ops.dops_callback_fn ->
+  unit