~ruther/guix-local

7b307a21dd723507854ee18e458167d0fb9134fd — Mathieu Othacehe 8 years ago 91b21ba 
vm: Use qemu drive device parameter.

* gnu/build/vm.scm (load-in-linux-vm): Use device parameter to define drive
  device.
patch browse .tar.gz 
1 files changed, 4 insertions(+), 2 deletions(-)

M gnu/build/vm.scm

M gnu/build/vm.scm => gnu/build/vm.scm +4 -2
@@ 127,8 127,10 @@ the #:references-graphs parameter of 'derivation'."
                                           builder)
                  (append
                   (if make-disk-image?
                       `("-drive" ,(string-append "file=" output
                                                  ",if=virtio"))
                       `("-device" "virtio-blk,drive=myhd"
                         "-drive" ,(string-append "if=none,file=" output
                                                  ",format=" disk-image-format
                                                  ",id=myhd"))
                       '())
                   ;; Only enable kvm if we see /dev/kvm exists.
                   ;; This allows users without hardware virtualization to still