scotty-tls 0.4.0 → 0.4.1
raw patch · 2 files changed
+8/−2 lines, 2 files
Files
- Web/Scotty/TLS.hs +7/−1
- scotty-tls.cabal +1/−1
Web/Scotty/TLS.hs view
@@ -4,6 +4,7 @@ ( -- * A method for running Scotty over TLS scottyTLS -- * Transformer version+ , scottyTLSSettings , scottyTTLS , module Web.Scotty.Trans ) where@@ -14,7 +15,7 @@ import Network.Wai.Handler.Warp (Port, defaultSettings, setPort) import Network.Wai.Handler.WarpTLS (certFile, defaultTlsSettings,- keyFile, runTLS)+ keyFile, runTLS, TLSSettings(..)) import Web.Scotty (scottyApp, ScottyM) import Web.Scotty.Trans (ScottyT, scottyAppT) @@ -22,6 +23,11 @@ scottyTLS :: Port -> FilePath -> FilePath -> ScottyM () -> IO () scottyTLS port key cert = runTLS (defaultTlsSettings { keyFile = key , certFile = cert })+ (setPort port defaultSettings) <=< scottyApp++scottyTLSSettings :: Port -> TLSSettings -> ScottyM () -> IO ()+scottyTLSSettings port settings = runTLS+ settings (setPort port defaultSettings) <=< scottyApp scottyTTLS :: (Monad m, MonadIO n) => Port -> FilePath -> FilePath ->
scotty-tls.cabal view
@@ -1,5 +1,5 @@ name: scotty-tls-version: 0.4.0+version: 0.4.1 synopsis: TLS for Scotty description: Run your Scotty apps over TLS homepage: https://github.com/dmjio/scotty-tls.git