indent call to launch

This commit is contained in:
Mitchell Rosen 2021-04-25 20:57:20 -04:00
parent f4e353f925
commit 722ae5ae1d

View File

@ -166,8 +166,8 @@ main = do
PT.putPrettyLn . P.string $ "I've started a codebase API server at "
PT.putPrettyLn . P.string $ "http://127.0.0.1:"
<> show port <> "?" <> URI.encode (unpack token)
PT.putPrettyLn' . P.string $ "Now starting the Unison Codebase Manager..."
launch currentDir mNewRun config theCodebase []
PT.putPrettyLn' . P.string $ "Now starting the Unison Codebase Manager..."
launch currentDir mNewRun config theCodebase []
[version] | isFlag "version" version ->
putStrLn $ progName ++ " version: " ++ Version.gitDescribe
[help] | isFlag "help" help -> PT.putPrettyLn (usage progName)