From 19fde4960dc1d6c8c05efd0f5b4293c2fb52ebf9 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Thu, 21 Oct 2010 16:30:16 -0400
Subject: new fromkey subcommand, for registering urls, etc

had to redo Annex monad's flag storage
---
 Core.hs | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

(limited to 'Core.hs')

diff --git a/Core.hs b/Core.hs
index 8dc4bff6f..4941dc26b 100644
--- a/Core.hs
+++ b/Core.hs
@@ -18,9 +18,8 @@ import qualified Annex
 import Utility
 			
 {- Sets up a git repo for git-annex. -}
-startup :: [Flag] -> Annex ()
-startup flags = do
-	mapM (\f -> Annex.flagChange f True) flags
+startup :: Annex ()
+startup = do
 	g <- Annex.gitRepo
 	liftIO $ gitAttributes g
 	prepUUID
-- 
cgit v1.2.3