X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=main.ml;h=82e4603fc2f91a142cf9ba0faee04f2e1017993e;hb=3b2348f5f4b770e3e7f886d851eeadc59bbd2357;hp=1fb7ce0a2a9b0b6b7aca5af68e9ef75a807382da;hpb=b9e8c84588873568b7fdfaeb9beb85466e84c8fa;p=guestfs-browser.git

diff --git a/main.ml b/main.ml
index 1fb7ce0..82e4603 100644
--- a/main.ml
+++ b/main.ml
@@ -22,8 +22,7 @@ open Utils
 
 (* Main. *)
 let () =
-  (* XXX command line *)
-  Utils.set_verbose_flag ();
+  let cli_request = Cmdline.command_line () in
 
   (* If we're in verbose mode, print some debug information which
    * could be useful in bug reports.
@@ -38,9 +37,11 @@ let () =
   Slave.set_failure_hook (Window.failure ws);
   Slave.set_busy_hook (Window.throbber_busy ws);
   Slave.set_idle_hook (Window.throbber_idle ws);
+  Slave.set_status_hook (Window.set_statusbar ws);
+  Slave.set_progress_hook (Window.progress ws);
 
   (* What did the user request on the command line? *)
-  (*Window.run_cli_request ws cli_request;*)
+  Window.run_cli_request ws cli_request;
 
   (* Run the main display thread.  When this returns, the application
    * has been closed.