~ruther/guix-local

e12ba8c865fd73267ff081c97ddecd46351edb07 — Rutherther 2 months ago ca0ed91
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>
1 files changed, 6 insertions(+), 5 deletions(-)

M gnu/system/image.scm
M gnu/system/image.scm => gnu/system/image.scm +6 -5
@@ 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)))


;;