This commit is contained in:
Joey Hess 2010-10-16 16:20:49 -04:00
parent 6d13ae10cf
commit 909f619c07
16 changed files with 27 additions and 11 deletions

View file

@ -3,17 +3,17 @@
import Control.Exception
import System.IO
import System.Environment
import qualified Annex
import Types
import Core
import Commands
import Annex
import qualified GitRepo as Git
main = do
args <- getArgs
gitrepo <- Git.repoFromCwd
state <- new gitrepo
state <- Annex.new gitrepo
(flags, actions) <- parseCmd args state
tryRun state $ [startup flags] ++ actions ++ [shutdown]