Updated MANIFEST.

[virt-top.git] / virt-ctrl / virt_ctrl.ml

diff --git a/virt-ctrl/virt_ctrl.ml b/virt-ctrl/virt_ctrl.ml
index b4a3159..9e5053e 100644 (file)
--- a/virt-ctrl/virt_ctrl.ml
+++ b/virt-ctrl/virt_ctrl.ml
@@ -18,15 +18,16 @@
 *)
 
 open Printf
+open Virt_ctrl_gettext.Gettext
 
 let () =
   (* Build the main window and wire up the buttons to the callback functions *)
   Vc_mainwindow.make
-    ~open_connection:Vc_connections.open_connection
     ~start_domain:Vc_domain_ops.start_domain
     ~pause_domain:Vc_domain_ops.pause_domain
     ~resume_domain:Vc_domain_ops.resume_domain
-    ~shutdown_domain:Vc_domain_ops.shutdown_domain;
+    ~shutdown_domain:Vc_domain_ops.shutdown_domain
+    ~open_domain_details:Vc_domain_ops.open_domain_details;
 
   (* Enter the Gtk main loop. *)
   GMain.main ();