sparsify: Add auto-detection of .vdi files.

[libguestfs.git] / sparsify / sparsify.ml

diff --git a/sparsify/sparsify.ml b/sparsify/sparsify.ml
index 4782983..956fccb 100644 (file)
--- a/sparsify/sparsify.ml
+++ b/sparsify/sparsify.ml
@@ -274,6 +274,8 @@ let output_format =
       );
       if string_prefix line "QEMU QCOW Image (v2)" then
         "qcow2"
+      else if string_find line "VirtualBox" >= 0 then
+        "vdi"
       else
         "raw" (* XXX guess *)