summaryrefslogtreecommitdiff
path: root/Remote/S3.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Remote/S3.hs')
-rw-r--r--Remote/S3.hs13
1 files changed, 7 insertions, 6 deletions
diff --git a/Remote/S3.hs b/Remote/S3.hs
index ffa6a11bb..4b56cce29 100644
--- a/Remote/S3.hs
+++ b/Remote/S3.hs
@@ -54,12 +54,13 @@ import Utility.Url (checkBoth, managerSettings, closeManager)
type BucketName = String
remote :: RemoteType
-remote = RemoteType {
- typename = "S3",
- enumerate = const (findSpecialRemotes "s3"),
- generate = gen,
- setup = s3Setup
-}
+remote = RemoteType
+ { typename = "S3"
+ , enumerate = const (findSpecialRemotes "s3")
+ , generate = gen
+ , setup = s3Setup
+ , exportSupported = exportUnsupported
+ }
gen :: Git.Repo -> UUID -> RemoteConfig -> RemoteGitConfig -> Annex (Maybe Remote)
gen r u c gc = do