diff --git a/lib/init-7.scm b/lib/init-7.scm
index 35971cba..8b4ea866 100644
--- a/lib/init-7.scm
+++ b/lib/init-7.scm
@@ -128,7 +128,7 @@
   (er-macro-transformer
    (lambda (expr rename compare)
      (if (null? (cdr expr))
-         #f
+         (if #f #f)
          ((lambda (cl)
             (if (compare (rename 'else) (car cl))
                 (if (pair? (cddr expr))