diff options
author | Ludovic Courtès <ludo@gnu.org> | 2013-11-19 00:03:29 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2013-11-19 00:03:29 +0100 |
commit | 30e457501dfba305e0554532f79594e567ca844b (patch) | |
tree | 407b42465e21b49a5342a949acc54aa959d4b814 /gnu/system/vm.scm | |
parent | d03bb6532ce426d8da527bd231418e539842c156 (diff) | |
download | guix-patches-30e457501dfba305e0554532f79594e567ca844b.tar guix-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'.
Diffstat (limited to 'gnu/system/vm.scm')
-rw-r--r-- | gnu/system/vm.scm | 2 |
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)) |