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

move supportedBackends list into annex monad

Browse source 
This was necessary so the File backend could import Backend w/o a cycle.

Moved code that checks whether enough backends have a file into File
backend.
This commit is contained in:
Joey Hess 2010-10-17 11:47:36 -04:00
parent 6bfa534aa4
commit b471822cfe
7 changed files with 105 additions and 95 deletions
Download patch file Download diff file Expand all files Collapse all files

3
git-annex.hs
View file

@ -9,11 +9,12 @@ import Types
import Core
import Commands
import qualified GitRepo as Git
import BackendList
main = do
args <- getArgs
gitrepo <- Git.repoFromCwd
state <- Annex.new gitrepo
state <- Annex.new gitrepo allBackends
(flags, actions) <- parseCmd args state
tryRun state $ [startup flags] ++ actions ++ [shutdown]