From be08b720825a09937e15a64c4c3ff81f56ddbe1f Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Sergio=20Pastor=20P=C3=A9rez?= Date: Fri, 28 Aug 2026 12:23:59 +0200 Subject: linux-initrd: Adjust 'base-initrd-modules' to fallback to 'linux-libre'. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit * gnu/system/linux-initrd.scm (base-initrd-modules): Adjust to fallback to 'linux-libre' modules if the provided kernel package misses the 'base-initrd-modules' package property. Fixes: #10859 Signed-off-by: Ludovic Courtès Merges: #10885 --- gnu/system/linux-initrd.scm | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'gnu/system') diff --git a/gnu/system/linux-initrd.scm b/gnu/system/linux-initrd.scm index b56e6cf5d42..6ace2985dae 100644 --- a/gnu/system/linux-initrd.scm +++ b/gnu/system/linux-initrd.scm @@ -375,7 +375,11 @@ FILE-SYSTEMS." (%current-system)))) "Return a list of modules tailored to KERNEL for SYSTEM to include in the initrd by default." - (assoc-ref (assoc-ref (package-properties kernel) 'base-initrd-modules) + (define (modules package) + (assoc-ref (package-properties package) 'base-initrd-modules)) + + (assoc-ref (or (modules kernel) + (modules linux-libre)) system)) (define* (base-initrd file-systems -- cgit v1.2.3