commit 83d6ec1fbdd29065e341ac01958bc32a74b1baa0
parent 10effac28fb85d7635af1eebd62a0eb1be079921
Author: Stevie Strickland <sstrickl@racket-lang.org>
Date: Tue, 1 Dec 2009 20:39:58 +0000
Here's the changes that accidentally went to trunk first.
svn: r17150
original commit: 75803d488132e6824e27c443370d7ff60eaf4011
Diffstat:
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/collects/scribble/lp-include.ss b/collects/scribble/lp-include.ss
@@ -7,8 +7,8 @@
(provide lp-include)
(define-syntax (module stx)
- (syntax-case stx ()
- [(module name base body ...)
+ (syntax-case stx (#%module-begin)
+ [(module name base (#%module-begin body ...))
(begin
#'(begin body ...))]))