[racket] scribble problem?

I think we need "web-flow/web-server-flow.rkt" and its dependencies to
diagnose this problem. Is that code available somewhere?

At Sun, 11 Sep 2011 10:10:44 +0530, Veer wrote:
> When I click Scribble HTML in DrRacket for code below
> 
> #lang scribble/manual
> @(require (for-label racket "web-flow/web-server-flow.rkt"))
> 
> @title{OAuth 2.0 Client Library}
> 
> 
> I get following error :
> 
> #%plain-lambda: cannot bind identifier tainted by macro expansion at:
> l17069 in: (#%plain-lambda (l17069) l17069)
>   (core . #(struct:srcloc
> #<path:/home/veer/racket/collects/web-server/lang/util.rkt> 31 0 1092
> 431))
>   (elim-callcc/mark . #(struct:srcloc
> #<path:/home/veer/racket/collects/web-server/lang/elim-callcc.rkt> 34
> 0 995 6129))
>   (#f . #(struct:srcloc
> #<path:/home/veer/racket/collects/web-server/lang.rkt> 22 5 664 172))
>   (#f . #(struct:srcloc
> #<path:/home/veer/racket/collects/web-server/lang/util.rkt> 48 0 1727
> 428))
>   (loop . #(struct:srcloc
> #<path:/home/veer/racket/collects/racket/private/map.rkt> 23 17 713
> 142))
>   (map . #(struct:srcloc
> #<path:/home/veer/racket/collects/racket/private/map.rkt> 18 11 540
> 876))
>   (#f . #(struct:srcloc
> #<path:/home/veer/racket/collects/web-server/lang/util.rkt> 70 0 2315
> 816))
>   (standard-module-name-resolver . #f)
>   (standard-module-name-resolver . #f)
>   (standard-module-name-resolver . #f)
>   (map . #(struct:srcloc
> #<path:/home/veer/racket/collects/racket/private/map.rkt> 18 11 540
> 876))
>   (|[running body]| . #(struct:srcloc
> #<path:/home/veer/racket/collects/scribble/run.rkt> #f #f #f #f))
>   (call-with-limits . #(struct:srcloc
> #<path:/home/veer/racket/collects/racket/sandbox.rkt> 334 0 13381
> 1825))
>   (call-with-custodian-shutdown . #(struct:srcloc
> #<path:/home/veer/racket/collects/racket/sandbox.rkt> 384 0 15374
> 326))
>   (call-with-break-parameterization . #(struct:srcloc
> #<path:/home/veer/racket/collects/racket/private/more-scheme.rkt> 151
> 2 5211 519))
>   (loop . #(struct:srcloc
> #<path:/home/veer/racket/collects/racket/sandbox.rkt> 727 9 30830
> 1481))
>   (#f . #(struct:srcloc
> #<path:/home/veer/racket/collects/mred/private/wx/common/queue.rkt>
> 430 6 18875 428))
>   (#f . #(struct:srcloc
> #<path:/home/veer/racket/collects/mred/private/wx/common/queue.rkt>
> 470 32 20234 120))