diff --git a/utils.lisp b/utils.lisp
index a410761..af360b1 100644
--- a/utils.lisp
+++ b/utils.lisp
@@ -709,7 +709,7 @@
            (,binds (begin ,@rest))))
 
        ((list* '= pattern body)
-        `(let-match1 ,pattern (progn ,@body)
+        `(let-match1 ,pattern (begin ,@body)
            (begin ,@rest)))
 
        ((structure ('=f name args . body))