Switch all the links to https

[ocaml-libvirt.git] / examples / get_all_domain_stats.ml

diff --git a/examples/get_all_domain_stats.ml b/examples/get_all_domain_stats.ml
index be91f77..9a4f4c2 100644 (file)
--- a/examples/get_all_domain_stats.ml
+++ b/examples/get_all_domain_stats.ml
@@ -1,6 +1,6 @@
 (* Example of using Domain.get_all_domain_stats (virConnectGetAllDomainStats).
  * Usage: get_all_domain_stats
- * http://libvirt.org/
+ * https://libvirt.org/
  *)
 
 open Printf
@@ -39,7 +39,7 @@ let () =
     exit 1
   );
 
-  let conn = C.connect_readonly () in
+  let conn = C.connect_auth_readonly (C.get_auth_default ()) in
 
   let what = [
     D.StatsState;