diff options
Diffstat (limited to 'examples/list_domains.ml')
-rw-r--r--[-rwxr-xr-x] | examples/list_domains.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/examples/list_domains.ml b/examples/list_domains.ml index 9451ab2..c97432c 100755..100644 --- a/examples/list_domains.ml +++ b/examples/list_domains.ml @@ -17,7 +17,7 @@ let () = Some (Sys.argv.(1)) else None in - let conn = C.connect ?name () in + let conn = C.connect_readonly ?name () in (* List running domains. *) let n = C.num_of_domains conn in |