web: clarify which libs we are calling to start up

This commit is contained in:
Simon Michael 2015-09-27 08:16:30 -10:00
parent dafa8efada
commit 3fa3926ee9

View File

@ -75,9 +75,9 @@ web opts j = do
then do then do
putStrLn "Press ctrl-c to quit" putStrLn "Press ctrl-c to quit"
hFlush stdout hFlush stdout
runSettings (setPort p defaultSettings) app Network.Wai.Handler.Warp.runSettings (setPort p defaultSettings) app
else do else do
putStrLn "Starting web browser if possible" putStrLn "Starting web browser if possible"
putStrLn "Web app will auto-exit after a few minutes with no browsers (or press ctrl-c)" putStrLn "Web app will auto-exit after a few minutes with no browsers (or press ctrl-c)"
hFlush stdout hFlush stdout
runUrlPort p "" app Network.Wai.Handler.Launch.runUrlPort p "" app