Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Newer zlib-enum

  • Loading branch information...
commit e6349e8b3b4c4a002bbea5a339203c2199fd6cca 1 parent c915c4f
Michael Snoyman authored
Showing with 2 additions and 4 deletions.
  1. +1 −2  Network/HTTP/Enumerator.hs
  2. +1 −2  http-enumerator.cabal
3  Network/HTTP/Enumerator.hs
View
@@ -102,7 +102,6 @@ import Data.Monoid (Monoid (..))
import qualified Network.HTTP.Types as W
import qualified Data.CaseInsensitive as CI
import Data.Int (Int64)
-import qualified Codec.Zlib
import qualified Codec.Zlib.Enum as Z
import Control.Monad.IO.Control (MonadControlIO, liftIOOp)
import Data.Map (Map)
@@ -273,7 +272,7 @@ http Request {..} bodyStep m = do
Nothing -> x
let decompress x =
if ("content-encoding", "gzip") `elem` hs'
- then joinI $ Z.decompress (Codec.Zlib.WindowBits 31) x
+ then joinI $ Z.ungzip x
else returnI x
if method == "HEAD"
then bodyStep s hs'
3  http-enumerator.cabal
View
@@ -28,8 +28,7 @@ library
, attoparsec-enumerator >= 0.2 && < 0.3
, utf8-string >= 0.3.4 && < 0.4
, blaze-builder >= 0.2.1 && < 0.4
- , zlib-bindings >= 0.0 && < 0.1
- , zlib-enum >= 0.1 && < 0.2
+ , zlib-enum >= 0.2 && < 0.3
, http-types >= 0.6 && < 0.7
, blaze-builder-enumerator >= 0.2 && < 0.3
, tls >= 0.4 && < 0.5
Please sign in to comment.
Something went wrong with that request. Please try again.