summaryrefslogtreecommitdiff
path: root/Remote/S3.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Remote/S3.hs')
-rw-r--r--Remote/S3.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/Remote/S3.hs b/Remote/S3.hs
index 154fb1ed4..5a956a5df 100644
--- a/Remote/S3.hs
+++ b/Remote/S3.hs
@@ -72,7 +72,8 @@ gen r u c gc = new <$> remoteCost gc expensiveRemoteCost
availability = GloballyAvailable,
remotetype = remote,
mkUnavailable = gen r u (M.insert "host" "!dne!" c) gc,
- getInfo = return [("bucket", fromMaybe "unknown" (getBucket c))]
+ getInfo = includeCredsInfo c (AWS.creds u)
+ [ ("bucket", fromMaybe "unknown" (getBucket c)) ]
}
s3Setup :: Maybe UUID -> Maybe CredPair -> RemoteConfig -> Annex (RemoteConfig, UUID)