diff --git a/collects/scribble/private/manual-code.rkt b/collects/scribble/private/manual-code.rkt
index e78d7d4850..cdece3f285 100644
--- a/collects/scribble/private/manual-code.rkt
+++ b/collects/scribble/private/manual-code.rkt
@@ -92,7 +92,7 @@
            ;; This makes sense when `expand' actually expands, and
            ;; probably not otherwise:
            [mods (let loop ([e e])
-                   (syntax-case e (module require begin)
+                   (syntax-case e (module #%require begin)
                      [(module name lang (mod-beg form ...))
                       (apply append
                              (link-mod #'lang 2)