diff --git a/yesod-bin/Devel.hs b/yesod-bin/Devel.hs index 11146a05..90641270 100644 --- a/yesod-bin/Devel.hs +++ b/yesod-bin/Devel.hs @@ -198,10 +198,10 @@ reverseProxy opts iappPort = do httpProxy = run (develPort opts) proxyApp httpsProxy = runProxyTls (develTlsPort opts) proxyApp putStrLn "Application can be accessed at:\n" - putStrLn $ "http://127.0.0.1:" ++ show (develPort opts) - putStrLn $ "https://127.0.0.1:" ++ show (develTlsPort opts) + putStrLn $ "http://localhost:" ++ show (develPort opts) + putStrLn $ "https://localhost:" ++ show (develTlsPort opts) putStrLn $ "If you wish to test https capabilities, you should set the following variable:" - putStrLn $ " export APPROOT=https://127.0.0.1:" ++ show (develTlsPort opts) + putStrLn $ " export APPROOT=https://localhost:" ++ show (develTlsPort opts) putStrLn "" loop (race_ httpProxy httpsProxy) `Ex.catch` \e -> do print (e :: Ex.SomeException)