Adding redundant req

svn: r16009
2009-09-14 21:08:33 +00:00 · 2009-09-14 21:08:33 +00:00 · 69d9e3fd4f
commit 69d9e3fd4f
parent b3ed0130fc
1 changed files with 1 additions and 1 deletions
--- a/collects/web-server/lang/util.ss
+++ b/collects/web-server/lang/util.ss
@ -73,7 +73,7 @@
     [(mb forms ...)
      (with-syntax ([(pmb body ...)
                     (local-expand (quasisyntax/loc stx
-                                     (#%module-begin forms ...))
+                                     (#%module-begin (require web-server/lang/lang-api) forms ...))
                                   'module-begin 
                                   empty)])
        (define base-labeling (make-labeling (string->bytes/utf-8 (format "~a" (syntax->datum stx)))))