virt-make-fs: In debug mode, print qemu-img command line.

[libguestfs.git] / tools / virt-make-fs

diff --git a/tools/virt-make-fs b/tools/virt-make-fs
index 854cc08..3825f70 100755 (executable)
--- a/tools/virt-make-fs
+++ b/tools/virt-make-fs
@@ -397,6 +397,9 @@ if (!defined $size) {
 # 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";