diff --git a/Commands/Web.hs b/Commands/Web.hs index 3d1b2ab53..05ed198d3 100644 --- a/Commands/Web.hs +++ b/Commands/Web.hs @@ -60,7 +60,7 @@ web opts args l = do server opts args l else do -- start the server (in background, so we can..) then start the web browser - printf "starting web interface at %s\n" homeurl + printf "starting web interface on port %d\n" tcpport tid <- forkIO $ server opts args l putStrLn "starting web browser" openBrowserOn homeurl