~ruther/guix-local

e84d8b30d9ec17e1d1860a068e78631c35f6c334 — Ludovic Courtès 11 years ago 3a100e7
vm: Enable QEMU support in the freestanding VM image.

* gnu/system/vm.scm (system-qemu-image): Add 'initrd' field.
1 files changed, 5 insertions(+), 0 deletions(-)

M gnu/system/vm.scm
M gnu/system/vm.scm => gnu/system/vm.scm +5 -0
@@ 329,6 329,11 @@ of the GNU system as described by OS."
            (operating-system-file-systems os)))

  (let ((os (operating-system (inherit os)
              ;; Use an initrd with the whole QEMU shebang.
              (initrd (cut base-initrd <>
                           #:virtio? #t
                           #:qemu-networking? #t))

              ;; Force our own root file system.
              (file-systems (cons (file-system
                                    (mount-point "/")