From c32a2429ed9f79041bcc25e9125c838e61bcf689 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Thu, 15 Oct 2015 10:37:06 -0400 Subject: [PATCH] S3: Fix support for using https. Was using the http-only Manager before, not the tls-capable one. --- Remote/S3.hs | 6 +++--- debian/changelog | 2 +- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/Remote/S3.hs b/Remote/S3.hs index d381e0b72b..fa88b84bc8 100644 --- a/Remote/S3.hs +++ b/Remote/S3.hs @@ -22,7 +22,7 @@ import qualified Data.Map as M import Data.Char import Network.Socket (HostName) import Network.HTTP.Conduit (Manager, newManager) -import Network.HTTP.Client (defaultManagerSettings, managerResponseTimeout, responseStatus, responseBody, RequestBody(..)) +import Network.HTTP.Client (managerResponseTimeout, responseStatus, responseBody, RequestBody(..)) import Network.HTTP.Types import Control.Monad.Trans.Resource import Control.Monad.Catch @@ -48,7 +48,7 @@ import Utility.Metered import Utility.DataUnits import Annex.Content import Annex.Url (withUrlOptions) -import Utility.Url (checkBoth, closeManager) +import Utility.Url (checkBoth, managerSettings, closeManager) type BucketName = String @@ -418,7 +418,7 @@ withS3HandleMaybe c u a = do Nothing -> a Nothing where s3cfg = s3Configuration c - httpcfg = defaultManagerSettings + httpcfg = managerSettings { managerResponseTimeout = Nothing } s3Configuration :: RemoteConfig -> S3.S3Configuration AWS.NormalQuery diff --git a/debian/changelog b/debian/changelog index a0011687db..709ae893ca 100644 --- a/debian/changelog +++ b/debian/changelog @@ -35,11 +35,11 @@ git-annex (5.20150931) UNRELEASED; urgency=medium Fixed this bug, which was introduced in version 5.20150727. * Avoid unncessary write to the location log when a file is unlocked and then added back with unchanged content. + * S3: Fix support for using https. * Debian: Add torrent library to build-depends as it's packaged now, and stop recommending bittornado | bittorrent. * Debian: Remove dependency on transformers library, as it is now included in ghc. - * -- Joey Hess Thu, 01 Oct 2015 12:42:56 -0400