From 7606f3e7c1cc1b13445d04d11372c197fb6a3f13 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 1 Aug 2012 16:31:16 -0400 Subject: [PATCH] cleanup --- Assistant/WebApp/Configurators.hs | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/Assistant/WebApp/Configurators.hs b/Assistant/WebApp/Configurators.hs index 5c2a1f25ed..e1fcfcd971 100644 --- a/Assistant/WebApp/Configurators.hs +++ b/Assistant/WebApp/Configurators.hs @@ -149,10 +149,7 @@ startFullAssistant path = do url <- liftIO $ do makeRepo path changeWorkingDirectory path - putStrLn "pre run" - r <- fromJust $ postFirstRun webapp - putStrLn $ "got " ++ r - return r + fromJust $ postFirstRun webapp redirect $ T.pack url {- Makes a new git-annex repository. -}