git.iko.soy/typeable/wai
on master help sign in
use breakByte instead of break
commit89fdbea8bc59e671f799cf1e4eb263296ce17f59 authorMatt Brown <matt@softmechanics.net> dateSat 26 Feb 2011, 14:33 (16 years ago) parentfd50079
1 file changed+1−1
compare with master
unifiedsplit
Network/Wai/Handler/Warp.hs+1−1
Network/Wai/Handler/Warp.hs+1−1
@@ -252,7 +252,7 @@ parseFirst s = do
252252 let (hfirst, hsecond) = B.splitAt 5 http'
253253 if (hfirst == "HTTP/")
254254 then
255− let (rpath, qstring) = B.break (== '?') query
255+ let (rpath, qstring) = S.breakByte 63 query -- '?'
256256 in return (method, rpath, qstring, hsecond)
257257 else E.throwError NonHttp
258258{-# INLINE parseFirst #-} -- FIXME is this inline necessary? the function is only called from one place and not exported