on master help sign in
enumerator 0.4.5
commit215b4b4384ffd3ea04a3a35263721c40deddee86 authorMichael Snoyman <michael@snoyman.com> dateFri 14 Jan 2011, 11:44 (16 years ago) parent2277409
2 files changed+3−2
Network/Wai/Handler/Warp.hs+2−1 warp.cabal+1−1
Network/Wai/Handler/Warp.hs+2−1
@@ -46,6 +46,7 @@ import Data.Typeable (Typeable)
4646
4747import Data.Enumerator (($$), (>>==))
4848import qualified Data.Enumerator as E
49+import qualified Data.Enumerator.List as EL
4950import Blaze.ByteString.Builder.Enumerator (builderToByteString)
5051import Blaze.ByteString.Builder.HTTP
5152 (chunkedTransferEncoding, chunkedTransferTerminator)
@@ -117,7 +118,7 @@ takeLine :: Int
117118 -> ([ByteString] -> [ByteString])
118119 -> E.Iteratee ByteString IO ByteString
119120takeLine len front = do
120− mbs <- E.head
121+ mbs <- EL.head
121122 case mbs of
122123 Nothing -> E.throwError IncompleteHeaders
123124 Just bs -> do
warp.cabal+1−1
@@ -22,7 +22,7 @@ Library
2222 , wai >= 0.3.0 && < 0.4
2323 , blaze-builder-enumerator >= 0.2 && < 0.3
2424 , transformers >= 0.2 && < 0.3
25− , enumerator >= 0.4 && < 0.5
25+ , enumerator >= 0.4.5 && < 0.5
2626 , blaze-builder >= 0.2.1.4 && < 0.3
2727 , sendfile >= 0.7.2 && < 0.8
2828 if flag(network-bytestring)