move local repo list out of control menu

2013-01-03 16:34:57 -04:00 · 2013-01-03 16:34:57 -04:00 · 09cbbaf537
commit 09cbbaf537
parent 4c0fb330eb
8 changed files with 36 additions and 28 deletions
--- a/Assistant/WebApp/Configurators/Local.hs
+++ b/Assistant/WebApp/Configurators/Local.hs
@ -148,8 +148,6 @@ getNewRepositoryR = page "Add another repository" (Just Configuration) $ do
 			u <- liftIO $ initRepo True path Nothing
 			runAnnex () $ setStandardGroup u ClientGroup
 			liftIO $ addAutoStart path
-			otherrepos <- liftIO $ listOtherRepos
-			modifyWebAppState $ \s -> s { otherRepos = otherrepos }
 			redirect $ SwitchToRepositoryR path
 		_ -> $(widgetFile "configurators/newrepository")