diff --git a/lib/init-7.scm b/lib/init-7.scm
index 422b65bc..3fd8d3b2 100644
--- a/lib/init-7.scm
+++ b/lib/init-7.scm
@@ -301,7 +301,7 @@
                           (,(rename 'quote) ,(caar ls)))
            ,(body (cdar ls))
            ,(clause (cdr ls))))))
-     `(let ((,(rename 'tmp) ,(cadr expr)))
+     `(,(rename 'let) ((,(rename 'tmp) ,(cadr expr)))
         ,(clause (cddr expr))))))
 
 (define-syntax do