http-conduit 1.9.5.2 → 1.9.5.3

raw patch · 3 files changed

+6/−5 lines, 3 filesdep ~wai

Dependency ranges changed: wai

Files

• Network/HTTP/Conduit/ConnInfo.hs +2/−1
• Network/HTTP/Conduit/Manager.hs +2/−2
• http-conduit.cabal +2/−2

@@ -146,7 +146,8 @@ #if DEBUG             removeSocket i #endif-            bye istate `E.finally` hClose h+            (bye istate `E.finally` hClose h) `E.catch`+                \(_ :: E.IOException) -> return ()         }   where     recvD istate = E.handle onEOF $ do

@@ -39,7 +39,7 @@  import Control.Monad.Trans.Control (MonadBaseControl) import Control.Monad.IO.Class (MonadIO, liftIO)-import Control.Exception (mask_, SomeException, catch, throwIO, fromException)+import Control.Exception (mask_, SomeException, catch, throwIO, fromException, IOException) import Control.Monad.Trans.Resource     ( ResourceT, runResourceT, MonadResource     , MonadThrow, MonadUnsafeIO@@ -328,7 +328,7 @@     mapM_ (nonEmptyMapM_ safeConnClose) $ maybe [] Map.elems m  safeConnClose :: ConnInfo -> IO ()-safeConnClose ci = connClose ci `catch` \(_::SomeException) -> return ()+safeConnClose ci = connClose ci `catch` \(_::IOException) -> return ()  nonEmptyMapM_ :: Monad m => (a -> m ()) -> NonEmptyList a -> m () nonEmptyMapM_ f (One x _) = f x

@@ -1,5 +1,5 @@ name:            http-conduit-version:         1.9.5.2+version:         1.9.5.3 license:         BSD3 license-file:    LICENSE author:          Michael Snoyman <michael@snoyman.com>@@ -121,7 +121,7 @@                  , lifted-base                  , time                  , network-                 , wai+                 , wai < 2.0                  , warp >= 1.3.6                  , socks                  , http-types