X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=ocaml%2Fexamples%2Flvs.ml;h=5db1089e05b3637806f7bc77df631a9ef7d4ce1f;hp=12c7c15a82267b970cdfaa66bb10e6bc5b685ea8;hb=58012dc9b67aa1b5de9c5dc70e7e471de3ed2a6a;hpb=bf26360e5e91148a4479f812c2b43acce4f5884e

diff --git a/ocaml/examples/lvs.ml b/ocaml/examples/lvs.ml
index 12c7c15..5db1089 100644
--- a/ocaml/examples/lvs.ml
+++ b/ocaml/examples/lvs.ml
@@ -9,9 +9,8 @@ let () =
   );
 
   let h = Guestfs.create () in
-  Guestfs.add_drive h Sys.argv.(1);
+  Guestfs.add_drive_opts h ~format:"raw" Sys.argv.(1);
   Guestfs.launch h;
-  Guestfs.wait_ready h;
 
   let pvs = Guestfs.pvs h in
   printf "PVs found: [ %s ]\n" (String.concat "; " (Array.to_list pvs));