From c2e836bf3a432d04d665197b72f802bdeb1086b8 Mon Sep 17 00:00:00 2001 From: Michael Snoyman Date: Tue, 31 Mar 2015 09:30:53 +0300 Subject: [PATCH] Some user-facing TLS info (pinging @chrisdone @DanBurton) --- yesod-bin/ChangeLog.md | 4 ++++ yesod-bin/Devel.hs | 6 ++++++ yesod-bin/yesod-bin.cabal | 2 +- 3 files changed, 11 insertions(+), 1 deletion(-) diff --git a/yesod-bin/ChangeLog.md b/yesod-bin/ChangeLog.md index 11d50f2f..2931209a 100644 --- a/yesod-bin/ChangeLog.md +++ b/yesod-bin/ChangeLog.md @@ -1,3 +1,7 @@ +## 1.4.6 + +* Add TLS support to `yesod devel` [#964](https://github.com/yesodweb/yesod/pull/964) + ## 1.4.5 * add a switch to yesod to skip deploying a .keter with copy-to [#952](https://github.com/yesodweb/yesod/issues/952) diff --git a/yesod-bin/Devel.hs b/yesod-bin/Devel.hs index f3c94eaf..b7f5ff27 100644 --- a/yesod-bin/Devel.hs +++ b/yesod-bin/Devel.hs @@ -183,6 +183,12 @@ reverseProxy opts iappPort = do runTLS tlsSettings (setPort port defaultSettings) app 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 $ "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 "" loop (race_ httpProxy httpsProxy) `Ex.onException` exitFailure where loop proxies = forever $ do diff --git a/yesod-bin/yesod-bin.cabal b/yesod-bin/yesod-bin.cabal index 45c8818c..6e6b75ea 100644 --- a/yesod-bin/yesod-bin.cabal +++ b/yesod-bin/yesod-bin.cabal @@ -1,5 +1,5 @@ name: yesod-bin -version: 1.4.5.1 +version: 1.4.6 license: MIT license-file: LICENSE author: Michael Snoyman