1 (* virt-manager-like graphical management tool.
2 (C) Copyright 2007 Richard W.M. Jones, Red Hat Inc.
4 $Id: mlvirtmanager.ml,v 1.1 2007/08/06 10:16:53 rjones Exp $
10 (* Build the main window and wire up the buttons to the callback functions *)
11 Mlvirtmanager_mainwindow.make
12 ~open_connection:Mlvirtmanager_connections.open_connection
13 ~start_domain:Mlvirtmanager_domain_ops.start_domain
14 ~pause_domain:Mlvirtmanager_domain_ops.pause_domain
15 ~resume_domain:Mlvirtmanager_domain_ops.resume_domain
16 ~shutdown_domain:Mlvirtmanager_domain_ops.shutdown_domain;
18 (* Enter the Gtk main loop. *)