git.iko.soy/typeable/wai
on master help sign in
Call withSocketsDo in warp-tls #212
commit64656e84749949afd198a172b4be76e6d35e55d2 authorMichael Snoyman <michael@snoyman.com> dateSun 29 Dec 2013, 08:35 (13 years ago) parent19bd886
2 files changed+2−2
compare with master
unifiedsplit
warp-tls/Network/Wai/Handler/WarpTLS.hs+1−1 warp-tls/warp-tls.cabal+1−1
warp-tls/Network/Wai/Handler/WarpTLS.hs+1−1
@@ -188,7 +188,7 @@ instance Exception WarpTLSException
188188
189189-- | Running 'Application' with 'TLSSettings' and 'Settings'.
190190runTLS :: TLSSettings -> Settings -> Application -> IO ()
191−runTLS tset set app =
191+runTLS tset set app = withSocketsDo $
192192 bracket
193193 (bindPort (settingsPort set) (settingsHost set))
194194 sClose
warp-tls/warp-tls.cabal+1−1
@@ -1,5 +1,5 @@
11Name: warp-tls
2−Version: 2.0.0
2+Version: 2.0.0.1
33Synopsis: HTTP over SSL/TLS support for Warp via the TLS package
44License: MIT
55License-file: LICENSE