summaryrefslogtreecommitdiffstats
path: root/ocaml
diff options
context:
space:
mode:
authorRichard W.M. Jones <rjones@redhat.com>2010-10-04 20:29:05 +0100
committerRichard W.M. Jones <rjones@redhat.com>2010-10-04 20:29:05 +0100
commit6af1cd7245de0183404ea6aadda4c2f63f9f616b (patch)
tree8ea604694905195eb18c11cae4765d738bbebc5c /ocaml
parent67636f721056d2f2250b0ff8acd981a0294536a9 (diff)
downloadlibguestfs-6af1cd7245de0183404ea6aadda4c2f63f9f616b.tar.gz
libguestfs-6af1cd7245de0183404ea6aadda4c2f63f9f616b.tar.xz
libguestfs-6af1cd7245de0183404ea6aadda4c2f63f9f616b.zip
ocaml: Create the handle when the object is instantiated.
Previously we had only one handle shared between all objects .. oops. This fixes commit 67636f721056d2f2250b0ff8acd981a0294536a9.
Diffstat (limited to 'ocaml')
-rw-r--r--ocaml/t/guestfs_005_load.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/ocaml/t/guestfs_005_load.ml b/ocaml/t/guestfs_005_load.ml
index 523f764c..8b4492ac 100644
--- a/ocaml/t/guestfs_005_load.ml
+++ b/ocaml/t/guestfs_005_load.ml
@@ -20,5 +20,5 @@ let _ = Guestfs.create
(* Also try the OO style. *)
let _ =
- let g = new Guestfs.guestfs in
+ let g = new Guestfs.guestfs () in
g#get_verbose ()