X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=tools%2Fvirt-make-fs;h=833c8a5145fc4280afdd628b5b85ae5314873b7a;hb=478b2d80ed1d613f621e89a97a0b140004ebac29;hp=3f27a623e37560c192521f1ff9a21fc75dbd277a;hpb=9a608a1516bd339dc6d5ebe9952d3bced273c416;p=libguestfs.git

diff --git a/tools/virt-make-fs b/tools/virt-make-fs
index 3f27a62..833c8a5 100755
--- a/tools/virt-make-fs
+++ b/tools/virt-make-fs
@@ -84,7 +84,7 @@ store something in it.
 
 Don't forget that you can also use local commands including
 L<resize2fs(8)> and L<virt-resize(1)> to resize existing filesystems,
-or rerun virt-make-resize to build another image from scratch.
+or rerun virt-make-fs to build another image from scratch.
 
 =head3 EXAMPLE
 
@@ -393,10 +393,15 @@ if (!defined $size) {
     }
 }
 
+$size = int ($size);
+
 # Create the output disk.
 # Take the unusual step of invoking qemu-img here.
 
 my @cmd = ("qemu-img", "create", "-f", $format, $output, $size);
+if ($debug) {
+    print STDERR ("running: ", join (" ", @cmd), "\n");
+}
 system (@cmd) == 0 or
     die __"qemu-img create: failed to create disk image, see earlier error messages\n";
 
@@ -405,7 +410,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")) {
@@ -524,11 +529,18 @@ sub create_pipe
     return $pipe;
 }
 
+=head1 SHELL QUOTING
+
+Libvirt guest names can contain arbitrary characters, some of which
+have meaning to the shell such as C<#> and space.  You may need to
+quote or escape these characters on the command line.  See the shell
+manual page L<sh(1)> for details.
+
 =head1 SEE ALSO
 
 L<guestfish(1)>,
 L<virt-resize(1)>,
-L<virt-tar(1)>,
+L<virt-tar-in(1)>,
 L<mkisofs(1)>,
 L<genisoimage(1)>,
 L<mksquashfs(1)>,