virt-make-fs: Specify format of disk (RHBZ#642934,CVE-2010-3851).

diff --git a/tools/virt-make-fs b/tools/virt-make-fs
index 1a6aee4..4e928af 100755 (executable)
--- a/tools/virt-make-fs
+++ b/tools/virt-make-fs
@@ -405,7 +405,7 @@ eval {
 
     # Run libguestfs.
     my $g = Sys::Guestfs->new ();
-    $g->add_drive ($output);
+    $g->add_drive_opts ($output, format => $format);
     $g->launch ();
 
     if ($type eq "ntfs" && !feature_available ($g, "ntfs3g", "ntfsprogs")) {