From b1e13e7f3fbc7d4902d52c9accf5dd49c082b675 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Sun, 16 Jan 2011 13:36:45 -0700 Subject: [PATCH] fix `codeblock' linking Closes PR 11624 --- collects/scribble/private/manual-code.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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)