On 5/26/05, felix winkelmann <[EMAIL PROTECTED]> wrote:
> That parameter is only bound in the "fallback-handler", that is, for special
> requests like .ssp pages.
> Here's a patch for spiffy.scm: <snip>
Cool! Please make it
(parameterize ((current-urlencoded-arguments ,args) (current-request ,req))
so that post-var works too. Actually I like a lot this function, which
I have extracted from define-http-resource:
(define (add-dynamic-resource url thunk)
(http:add-resource url
(lambda (request args)
(parameterize ((current-urlencoded-arguments args)
(current-request request))
(let/cc return
(let/ respond (http-resource:responder request return)
(handle-exceptions exn
(parameterize
([http:error-response-handler (http-resource:error-handler exn)])
(http:write-error-response 500 "Internal Server Error"))
(respond (thunk)))))))))
Maybe it would be a good idea to expose it directly, would do you think?
Michele Simionato
_______________________________________________
Chicken-users mailing list
[email protected]
http://lists.nongnu.org/mailman/listinfo/chicken-users
