aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2020-11-10 12:20:09 +0100
committerLudovic Courtès <ludo@gnu.org>2020-11-10 12:20:09 +0100
commit7a20c1676a8421f3ac06a2634a27c2837293df0b (patch)
tree2e3f277d65bc8e5aad1bfdbed051dda9498b903c
parentb51da3ccef74e5842b87e39eea839e36831e844e (diff)
downloadguix-7a20c1676a8421f3ac06a2634a27c2837293df0b.tar
guix-7a20c1676a8421f3ac06a2634a27c2837293df0b.tar.gz
vm: 'system-qemu-image' forces the use of i386/BIOS GRUB.
Fixes <https://bugs.gnu.org/44511>. Reported by Maxim Cournoyer <maxim.cournoyer@gmail.com>. * gnu/system/vm.scm (system-qemu-image): Add 'bootloader' field to OS.
-rw-r--r--gnu/system/vm.scm9
1 files changed, 8 insertions, 1 deletions
diff --git a/gnu/system/vm.scm b/gnu/system/vm.scm
index 21d777a3fe..c9580f6e7f 100644
--- a/gnu/system/vm.scm
+++ b/gnu/system/vm.scm
@@ -655,7 +655,14 @@ of the GNU system as described by OS."
'dce)))
- (let* ((os (operating-system (inherit os)
+ (let* ((os (operating-system
+ (inherit os)
+
+ ;; As in 'virtualized-operating-system', use BIOS-style GRUB.
+ (bootloader (bootloader-configuration
+ (bootloader grub-bootloader)
+ (target "/dev/vda")))
+
;; Assume we have an initrd with the whole QEMU shebang.
;; Force our own root file system. Refer to it by UUID so that