summaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
Diffstat (limited to 'gnu')
-rw-r--r--gnu/system/linux-initrd.scm6
1 files changed, 5 insertions, 1 deletions
diff --git a/gnu/system/linux-initrd.scm b/gnu/system/linux-initrd.scm
index d1cd8d98b7b..f00a72afebc 100644
--- a/gnu/system/linux-initrd.scm
+++ b/gnu/system/linux-initrd.scm
@@ -154,7 +154,11 @@ MODULES and taken from LINUX."
'())))
(define modules-to-lookup
- (lset-difference string=? '#$modules builtin-modules))
+ (remove (lambda (module)
+ (member (normalize-module-name module)
+ ;; Normalized by `file-name->module-name'.
+ builtin-modules))
+ '#$modules))
(define modules
(let* ((lookup (cut find-module-file module-dir <>))