aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2013-11-19 00:03:29 +0100
committerLudovic Courtès <ludo@gnu.org>2013-11-19 00:03:29 +0100
commit30e457501dfba305e0554532f79594e567ca844b (patch)
tree407b42465e21b49a5342a949acc54aa959d4b814
parentd03bb6532ce426d8da527bd231418e539842c156 (diff)
downloadpatches-30e457501dfba305e0554532f79594e567ca844b.tar
patches-30e457501dfba305e0554532f79594e567ca844b.tar.gz
gnu: vm: Really create a QCOW2-format image.
* gnu/system/vm.scm (expression->derivation-in-linux-vm): Pass "-f qcow2" to 'qemu-img create'.
-rw-r--r--gnu/system/vm.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/gnu/system/vm.scm b/gnu/system/vm.scm
index db055fa5fc..2413a97150 100644
--- a/gnu/system/vm.scm
+++ b/gnu/system/vm.scm
@@ -134,7 +134,7 @@ made available under the /xchg CIFS share."
(setenv "PATH" cu)
,(if make-disk-image?
- `(zero? (system* img "create" "image.qcow2"
+ `(zero? (system* img "create" "-f" "qcow2" "image.qcow2"
,(number->string disk-image-size)))
'(begin))