diff --git a/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/optimizer/optimizer.rkt b/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/optimizer/optimizer.rkt
index b1a3c93e..a933d3c0 100644
--- a/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/optimizer/optimizer.rkt
+++ b/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/optimizer/optimizer.rkt
@@ -73,7 +73,7 @@
             e:opt-expr ...)
            #:with opt (quasisyntax/loc/origin this-syntax #'kw
                         (kw e.opt ...)))
-  (pattern (~and ((~or #%provide %require begin-for-syntax module module*) . _) opt))
+  (pattern (~and ((~or #%provide #%require begin-for-syntax module module*) . _) opt))
   (pattern (~and (~or (quote _) (quote-syntax _) :id) opt)))
 
 (define (optimize-top stx)