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 <>))