haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

s/127.0.0.1/localhost yesodweb/yesod-scaffold#114

Browse Source
This commit is contained in:
Michael Snoyman 2015-12-06 12:55:16 +02:00
parent af00b76a18
commit 32dbad23d3
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
yesod-bin/Devel.hs
View File

@ -198,10 +198,10 @@ reverseProxy opts iappPort = do
httpProxy = run (develPort opts) proxyApp httpProxy = run (develPort opts) proxyApp
httpsProxy = runProxyTls (develTlsPort opts) proxyApp httpsProxy = runProxyTls (develTlsPort opts) proxyApp
putStrLn "Application can be accessed at:\n" putStrLn "Application can be accessed at:\n"
putStrLn $ "http://127.0.0.1:" ++ show (develPort opts) putStrLn $ "http://localhost:" ++ show (develPort opts)
putStrLn $ "https://127.0.0.1:" ++ show (develTlsPort opts) putStrLn $ "https://localhost:" ++ show (develTlsPort opts)
putStrLn $ "If you wish to test https capabilities, you should set the following variable:" 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 "" putStrLn ""
loop (race_ httpProxy httpsProxy) `Ex.catch` \e -> do loop (race_ httpProxy httpsProxy) `Ex.catch` \e -> do
print (e :: Ex.SomeException) print (e :: Ex.SomeException)