git.iko.soy/typeable/wai
on master help sign in
API change in wai-extra
commit3308bfe8b03abde4b5713efd3c3489048d4f7aff authorMichael Snoyman <michael@snoyman.com> dateWed 28 Jul 2010, 09:07 (16 years ago) parentd6110dd
1 file changed+1−1
compare with master
unifiedsplit
Network/Wai/Handler/FastCGI.hsc+1−1
Network/Wai/Handler/FastCGI.hsc+1−1
@@ -114,7 +114,7 @@ handleRequest :: W.Application
114114handleRequest f ins outs _errs env xsendfile =
115115 do
116116 vars <- environToTable env
117− let input = sRead ins
117+ let input = const $ sRead ins
118118 let hPut = sPutStr' outs
119119 CGI.run'' vars (CGI.requestBodyFunc input) hPut xsendfile f
120120