DAV 1.3.2 → 1.3.3
raw patch · 2 files changed
+4/−4 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- DAV.cabal +2/−2
- Network/Protocol/HTTP/DAV.hs +2/−2
DAV.cabal view
@@ -1,5 +1,5 @@ name: DAV-version: 1.3.2+version: 1.3.3 synopsis: RFC 4918 WebDAV support description: This is a library for the Web Distributed Authoring and Versioning@@ -93,4 +93,4 @@ source-repository this type: git location: https://salsa.debian.org/clint/DAV.git- tag: DAV/1.3.2+ tag: DAV/1.3.3
Network/Protocol/HTTP/DAV.hs view
@@ -78,7 +78,7 @@ import Data.Maybe (catMaybes, fromMaybe) #if MIN_VERSION_http_client(0,5,0)-import Network.HTTP.Client (defaultRequest, HttpExceptionContent(StatusCodeException), parseUrlThrow, responseTimeoutDefault, responseTimeoutMicro)+import Network.HTTP.Client (defaultRequest, HttpExceptionContent(StatusCodeException), parseUrlThrow, responseTimeoutDefault, responseTimeoutMicro, responseTimeoutNone) #else import Network.HTTP.Client (parseUrl) #endif@@ -151,7 +151,7 @@ setResponseTimeout :: MonadIO m => Maybe Int -> DAVT m () #if MIN_VERSION_http_client(0,5,0)-setResponseTimeout rt = baseRequest %= \x -> x { responseTimeout = maybe responseTimeoutDefault responseTimeoutMicro rt }+setResponseTimeout rt = baseRequest %= \x -> x { responseTimeout = maybe responseTimeoutNone responseTimeoutMicro rt } #else setResponseTimeout rt = baseRequest %= \x -> x { responseTimeout = rt } #endif