diff --git a/collects/web-server/formlets/syntax.ss b/collects/web-server/formlets/syntax.ss
index 9a7ad2912a..c586052d86 100644
--- a/collects/web-server/formlets/syntax.ss
+++ b/collects/web-server/formlets/syntax.ss
@@ -34,11 +34,11 @@
           #,@(map circ-of (syntax->list #'(n ...))))))]
     [(t ([k v] ...) n ...)
      (quasisyntax/loc stx
-       (tag-xexpr 't '([k v] ...)
+       (tag-xexpr `t `([k v] ...)
                  #,(circ-of (syntax/loc stx (#%# n ...)))))]
     [(t n ...)
      (quasisyntax/loc stx
-       (tag-xexpr 't empty
+       (tag-xexpr `t empty
                  #,(circ-of (syntax/loc stx (#%# n ...)))))]))
 
 (define-syntax (formlet stx)