This commit is contained in:
Joey Hess 2012-08-01 16:31:16 -04:00
parent 8181b38ef6
commit 7606f3e7c1

View file

@ -149,10 +149,7 @@ startFullAssistant path = do
url <- liftIO $ do url <- liftIO $ do
makeRepo path makeRepo path
changeWorkingDirectory path changeWorkingDirectory path
putStrLn "pre run" fromJust $ postFirstRun webapp
r <- fromJust $ postFirstRun webapp
putStrLn $ "got " ++ r
return r
redirect $ T.pack url redirect $ T.pack url
{- Makes a new git-annex repository. -} {- Makes a new git-annex repository. -}