~ruther/guix-local

30e457501dfba305e0554532f79594e567ca844b — Ludovic Courtès 12 years ago d03bb65
gnu: vm: Really create a QCOW2-format image.

* gnu/system/vm.scm (expression->derivation-in-linux-vm): Pass "-f
  qcow2" to 'qemu-img create'.
1 files changed, 1 insertions(+), 1 deletions(-)

M gnu/system/vm.scm
M gnu/system/vm.scm => gnu/system/vm.scm +1 -1
@@ 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))