mirror of
https://codeberg.org/guix/guix.git
synced 2026-01-25 03:55:08 -06:00
image: Fix bootloader-uses-grub-efi logic.
* gnu/system/image.scm (bootloader-uses-grub-efi?): Check by symbol names, not by bounded symbols. Change-Id: Ia50b07a160ca9c081c9e4cb5e3d6ebdabc89ad4c Signed-off-by: Efraim Flashner <efraim@flashner.co.il>
This commit is contained in:
parent
ca0ed91b40
commit
e12ba8c865
1 changed files with 6 additions and 5 deletions
|
|
@ -369,11 +369,12 @@ set to the given OS."
|
|||
(define (bootloader-uses-grub-efi? bootloader)
|
||||
"Return true if the bootloader-name contains grub-efi."
|
||||
(memq (bootloader-name bootloader)
|
||||
(list grub-efi grub-efi32
|
||||
grub-efi-removable-bootloader
|
||||
grub-efi32-removable-bootloader
|
||||
grub-efi-netboot-bootloader
|
||||
grub-efi-netboot-removable-bootloader)))
|
||||
'(grub-efi
|
||||
grub-efi32
|
||||
grub-efi-removable-bootloader
|
||||
grub-efi32-removable-bootloader
|
||||
grub-efi-netboot-bootloader
|
||||
grub-efi-netboot-removable-bootloader)))
|
||||
|
||||
|
||||
;;
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue