http-conduit 2.3.7.2 → 2.3.7.3

raw patch · 3 files changed

+8/−14 lines, 3 filesdep −network-bsddep ~http-clientdep ~networkdep ~warpPVP ok

version bump matches the API change (PVP)

Dependencies removed: network-bsd

Dependency ranges changed: http-client, network, warp

API changes (from Hackage documentation)

Files

• ChangeLog.md +4/−0
• http-conduit.cabal +3/−11
• test/main.hs +1/−3

@@ -1,5 +1,9 @@ # ChangeLog for http-conduit +## 2.3.7.3++* Relax test suite version bounds+ ## 2.3.7.2  * Add the `network3` flag

@@ -1,5 +1,5 @@ name:            http-conduit-version:         2.3.7.2+version:         2.3.7.3 license:         BSD3 license-file:    LICENSE author:          Michael Snoyman <michael@snoyman.com>@@ -66,7 +66,7 @@                  , case-insensitive                  , unliftio                  , wai >= 3.0 && < 3.3-                 , warp >= 3.0.0.2 && < 3.3+                 , warp >= 3.0.0.2 && < 3.4                  , wai-conduit                  , http-types                  , cookie@@ -77,15 +77,7 @@                  , aeson                  , temporary                  , resourcet-  if flag(network3)-    build-depends: network >= 3, network-bsd-  else-    build-depends: network < 3--flag network3-  default: False-  manual: False-  description: Use network 3 or higher+                 , network  source-repository head   type:     git

@@ -21,7 +21,6 @@ import qualified Data.IORef as I import qualified Control.Exception as E (catch) import qualified Network.Socket as NS-import qualified Network.BSD import CookieTest (cookieTest) #if MIN_VERSION_conduit(1,1,0) import Data.Conduit.Network (runTCPServer, serverSettings, appSink, appSource, ServerSettings)@@ -406,9 +405,8 @@      describe "hostAddress" $ do         it "overrides host" $ withApp app $ \port -> do-            entry <- Network.BSD.getHostByName "127.0.0.1"             req' <- parseUrlThrow $ "http://example.com:" ++ show port-            let req = req' { hostAddress = Just $ Network.BSD.hostAddress entry }+            let req = req' { hostAddress = Just 0x0100007f } -- 127.0.0.1             manager <- newManager tlsManagerSettings             res <- httpLbs req manager             responseBody res @?= "homepage for example.com"