git.iko.soy/typeable/wai
on master help sign in
Exposing responseHeader
commitadca2a916f2e91976b6ac24d11e84edd0fd418b6 authorMichael Snoyman <michael@snoyman.com> dateThu 13 May 2010, 20:56 (16 years ago) parentf93a2b4
2 files changed+2−1
compare with master
unifiedsplit
Network/Wai.hs+1 Network/Wai/Handler/SimpleServer.hs+1−1
Network/Wai.hs+1
@@ -52,6 +52,7 @@ module Network.Wai
5252 , requestHeaderToLower
5353 -- ** Response header names
5454 , ResponseHeader (..)
55+ , responseHeader
5556 , responseHeaderFromBS
5657 , responseHeaderToBS
5758 , responseHeaderToLower
Network/Wai/Handler/SimpleServer.hs+1−1
@@ -142,7 +142,7 @@ requestBodyHandle h len = Source $ do
142142 putStrLn $ "reading a chunk of size " ++ show (BS.length bs)
143143 return $ Just (bs, requestBodyHandle h newLen)
144144
145−parseFirst :: (StringLike s, MonadFailure InvalidRequest m) =>
145+parseFirst :: (StringLike s, Failure InvalidRequest m) =>
146146 s
147147 -> m (s, s, s)
148148parseFirst s = do