diff --git a/distro/packages/base.scm b/distro/packages/base.scm
index 30bd804b56..f782d78895 100644
--- a/distro/packages/base.scm
+++ b/distro/packages/base.scm
@@ -803,7 +803,7 @@ exec ~a/bin/~a-gcc -B~a/lib -Wl,-dynamic-linker -Wl,~a/~a \"$@\"~%"
      `(("binutils" ,binutils-boot0)
        ("gcc" ,gcc-boot0)
        ("libc" ,glibc-final)
-       ("bash" ,(assoc-ref %boot1-inputs "bash"))))
+       ,(assoc "bash" %boot1-inputs)))
     (inputs '())))
 
 (define %boot2-inputs