X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=examples%2Fget_cpu_stats.ml;h=27e130630d6bb9c15069f870edf6abfaf1793005;hb=c338d3194fb5969c927ece7d4fd09569d54b203b;hp=814c85e65ba1d5944c9af3c1ab12846d432c63d7;hpb=2ba6898b4dc121b00078e36d5416b3caadd5d05e;p=ocaml-libvirt.git

diff --git a/examples/get_cpu_stats.ml b/examples/get_cpu_stats.ml
index 814c85e..27e1306 100644
--- a/examples/get_cpu_stats.ml
+++ b/examples/get_cpu_stats.ml
@@ -17,7 +17,7 @@ let () =
     );
     let domname = Sys.argv.(1) in
 
-    let conn = C.connect_readonly () in
+    let conn = C.connect_auth_readonly (C.get_auth_default ()) in
 
     (*
     let nr_pcpus =