aboutsummaryrefslogtreecommitdiff
path: root/Core.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-10-14 21:10:59 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-10-14 21:10:59 -0400
commit29039fdf97f541a1077c9af65ccbe09dd2ae2b28 (patch)
treed46d1c1489422352df166789cf9baeb56132501b /Core.hs
parent4c3ad80f320d3c4cccc3e41e4f2364155bae22a1 (diff)
add flags, and change to subcommand style
Diffstat (limited to 'Core.hs')
-rw-r--r--Core.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/Core.hs b/Core.hs
index 6f05394bb..765b1e6a7 100644
--- a/Core.hs
+++ b/Core.hs
@@ -12,8 +12,9 @@ import qualified GitRepo as Git
import qualified Annex
{- Sets up a git repo for git-annex. -}
-setup :: Annex ()
-setup = do
+startup :: [Flag] -> Annex ()
+startup flags = do
+ Annex.flagsChange flags
g <- Annex.gitRepo
liftIO $ gitAttributes g
prepUUID