Merge.

[virt-df.git] / virt-df / virt_df_main.ml

diff --git a/virt-df/virt_df_main.ml b/virt-df/virt_df_main.ml
index bcb798a..0d5c12d 100644 (file)
--- a/virt-df/virt_df_main.ml
+++ b/virt-df/virt_df_main.ml
@@ -126,7 +126,7 @@ OPTIONS" in
        (* Connect to the hypervisor. *)
        let conn =
          let name = !uri in
-         try C.connect_readonly ?name ()
+         try C.connect ?name ()
          with
            Libvirt.Virterror err ->
              prerr_endline (Libvirt.Virterror.to_string err);