allow enabling existing S3 repos
This commit is contained in:
parent
17708dd173
commit
c2c577f34f
5 changed files with 93 additions and 33 deletions
|
@ -65,6 +65,7 @@ repoList onlyconfigured
|
|||
Just c -> case M.lookup "type" c of
|
||||
Just "rsync" -> u `enableswith` EnableRsyncR
|
||||
Just "directory" -> u `enableswith` EnableDirectoryR
|
||||
Just "S3" -> u `enableswith` EnableS3R
|
||||
_ -> Nothing
|
||||
u `enableswith` r = Just (u, Just $ r u)
|
||||
list l = runAnnex [] $ do
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue