diff --git a/collects/scribblings/reference/syntax.scrbl b/collects/scribblings/reference/syntax.scrbl
index 88491ef5fb..fa4221f4c1 100644
--- a/collects/scribblings/reference/syntax.scrbl
+++ b/collects/scribblings/reference/syntax.scrbl
@@ -737,7 +737,7 @@ instead of
   @schemeblock[
     (require (filtered-in
               (lambda (name)
-                (and (regexp-match? #rx"[a-z-]+")
+                (and (regexp-match? #rx"[a-z-]+" name)
                      (regexp-replace
                       #rx"-" (string-titlecase name) "")))
               scheme/base))]
@@ -767,7 +767,7 @@ instead of
   @schemeblock[
     (provide (filtered-out
               (lambda (name)
-                (and (regexp-match? #rx"[a-z-]+")
+                (and (regexp-match? #rx"[a-z-]+" name)
                      (regexp-replace
                       #rx"-" (string-titlecase name) "")))
               (all-defined-out)))]