mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

skeleton of S3 remote

Browse source
This commit is contained in:
Joey Hess 2011-03-27 22:00:44 -04:00
parent 6b5918c295
commit 65b72604d7
2 changed files with 66 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

7
Remote.hs
View file

@ -29,7 +29,7 @@ import Data.String.Utils
import RemoteClass
import qualified Remote.Git
--import qualified Remote.S3
import qualified Remote.S3
import Types
import UUID
import qualified Annex
@ -39,7 +39,10 @@ import Messages
{- Add generators for new Remotes here. -}
generators :: [Annex (RemoteGenerator Annex)]
generators = [Remote.Git.generate]
generators =
[ Remote.Git.generate
, Remote.S3.generate
]
{- Runs a list of generators. -}
runGenerators :: [Annex (RemoteGenerator Annex)] -> Annex [Remote Annex]