diff --git a/gnu/system/linux-initrd.scm b/gnu/system/linux-initrd.scm
index e7f97bb88d..7a7592bf0a 100644
--- a/gnu/system/linux-initrd.scm
+++ b/gnu/system/linux-initrd.scm
@@ -262,8 +262,8 @@ FILE-SYSTEMS."
      (let ((table (vhash mapping ...)))
        (lambda (key)
          (match (vhash-assoc key table)
-           (#f    default)
-           (value value)))))))
+           (#f            default)
+           ((key . value) value)))))))
 
 (define file-system-type-modules
   ;; Given a file system type, return the list of modules it needs.