fix `codeblock' linking

Closes PR 11624 original commit: b1e13e7f3fbc7d4902d52c9accf5dd49c082b675
2011-01-16 13:36:45 -07:00 · 2011-01-16 13:36:45 -07:00 · 5de2c07566
commit 5de2c07566
parent e199fb6177
1 changed files with 1 additions and 1 deletions
--- 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)