From e84d8b30d9ec17e1d1860a068e78631c35f6c334 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Fri, 4 Jul 2014 19:01:22 +0200
Subject: [PATCH] vm: Enable QEMU support in the freestanding VM image.
* gnu/system/vm.scm (system-qemu-image): Add 'initrd' field.
---
gnu/system/vm.scm | 5 +++++
1 file changed, 5 insertions(+)
diff --git a/gnu/system/vm.scm b/gnu/system/vm.scm
index 50f7e6f692f..a90b24305dd 100644
--- a/gnu/system/vm.scm
+++ b/gnu/system/vm.scm
@@ -329,6 +329,11 @@ (define file-systems-to-keep
(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 "/")
--
GitLab