docs: Standard C examples, and guestfs-examples(3) man page.

[libguestfs.git] / ocaml / examples / lvs.ml

diff --git a/ocaml/examples/lvs.ml b/ocaml/examples/lvs.ml
index 74998b9..5db1089 100644 (file)
--- a/ocaml/examples/lvs.ml
+++ b/ocaml/examples/lvs.ml
@@ -9,7 +9,7 @@ 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;
 
   let pvs = Guestfs.pvs h in