summaryrefslogtreecommitdiff
path: root/Remote/S3.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Remote/S3.hs')
-rw-r--r--Remote/S3.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Remote/S3.hs b/Remote/S3.hs
index 3ed46a2ad..97265e148 100644
--- a/Remote/S3.hs
+++ b/Remote/S3.hs
@@ -123,7 +123,7 @@ s3Setup' new u mcreds c gc
return (fullconfig, u)
defaulthost = do
- (c', encsetup) <- encryptionSetup c
+ (c', encsetup) <- encryptionSetup c gc
c'' <- setRemoteCredPair encsetup c' gc (AWS.creds u) mcreds
let fullconfig = c'' `M.union` defaults
when new $