diff options
Diffstat (limited to 'virt-ctrl/vc_mainwindow.mli')
| -rw-r--r-- | virt-ctrl/vc_mainwindow.mli | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/virt-ctrl/vc_mainwindow.mli b/virt-ctrl/vc_mainwindow.mli new file mode 100644 index 0000000..eb99b63 --- /dev/null +++ b/virt-ctrl/vc_mainwindow.mli @@ -0,0 +1,29 @@ +(* virt-manager-like graphical management tool. + (C) Copyright 2007 Richard W.M. Jones, Red Hat Inc. + http://libvirt.org/ + + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 2 of the License, or + (at your option) any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program; if not, write to the Free Software + Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. + + Make the main window. +*) + +(** This function creates the main window. You have to pass in + 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 |