diff --git a/collects/mzlib/plt-match.ss b/collects/mzlib/plt-match.ss
index 782eda3..1b2761d 100644
--- a/collects/mzlib/plt-match.ss
+++ b/collects/mzlib/plt-match.ss
@@ -225,10 +225,11 @@
           ((_ exp clause ...)
            (quasisyntax/loc 
             stx 
-            (let ((x exp)) #,(gen-match (syntax x)
-                                        '()
-                                        (syntax (clause ...))
-                                        stx)))))))
+            (let ((x exp))
+              #,(gen-match (syntax x)
+                           '()
+                           (syntax (clause ...))
+                           stx)))))))
 
     (define match-lambda/proc 
       (lambda (stx)