From e12ba8c865fd73267ff081c97ddecd46351edb07 Mon Sep 17 00:00:00 2001 From: Rutherther Date: Mon, 1 Dec 2025 07:51:27 +0100 Subject: [PATCH] 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 --- gnu/system/image.scm | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/gnu/system/image.scm b/gnu/system/image.scm index e7282f584f7..cb4f67653b3 100644 --- a/gnu/system/image.scm +++ b/gnu/system/image.scm @@ -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))) ;;