@@ -8,8 +8,7 @@ module Main
88
99import Control.Monad (msum)
1010import qualified Data.ByteString as BS
11−import Network.HTTP.Client (newManager)
12−import Network.HTTP.Client.TLS (tlsManagerSettings)
11+import Network.HTTP.Client.TLS (newTlsManager)
1312import Snap.Core
1413import Snap.Http.Server
1514import qualified System.Environment as Env
@@ -28,7 +27,7 @@ import qualified Endpoint.Slack as Slack
2827
2928main :: IO ()
3029main =
31− do manager <- newManager tlsManagerSettings
30+ do manager <- newTlsManager
3231 slackToken <- Env.getEnv "SLACK_TOKEN"
3332 rArtifacts <- Artifacts.loadRepl
3433 cArtifacts <- Artifacts.loadCompile