mattermost-api 40800.0.0 → 40800.0.1
raw patch · 3 files changed
+14/−7 lines, 3 filesdep ~memoryPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
Dependency ranges changed: memory
API changes (from Hackage documentation)
- Network.Mattermost.Types: createPool :: Hostname -> Port -> ConnectionContext -> ConnectionPoolConfig -> IO (Pool MMConn)
+ Network.Mattermost.Types: createPool :: Hostname -> Port -> ConnectionContext -> ConnectionPoolConfig -> Bool -> IO (Pool MMConn)
Files
- CHANGELOG.md +7/−0
- mattermost-api.cabal +2/−2
- src/Network/Mattermost/Types.hs +5/−5
CHANGELOG.md view
@@ -1,4 +1,11 @@ +40800.0.1+=========++ * `createPool` now requires a secure connection argument. Previously it+ always defaulted to `True` which broke insecure connection setups.+ * Removed the upper bound from `memory` to support GHC 8.4.+ 40800.0.0 =========
mattermost-api.cabal view
@@ -1,5 +1,5 @@ name: mattermost-api-version: 40800.0.0+version: 40800.0.1 synopsis: Client API for Mattermost chat system description: Client API for Mattermost chat system license: BSD3@@ -44,7 +44,7 @@ , stm , aeson >= 1.0.0.0 , connection- , memory <0.14.3+ , memory , resource-pool >= 0.2.3 -- To prevent broken websockets versions from using -- incompatible versions of binary (for details, see
src/Network/Mattermost/Types.hs view
@@ -80,21 +80,21 @@ , cdUseTLS = False } -createPool :: Hostname -> Port -> ConnectionContext -> ConnectionPoolConfig -> IO (Pool.Pool MMConn)-createPool host port ctx cpc =- Pool.createPool (mkConnection ctx host port True) closeMMConn+createPool :: Hostname -> Port -> ConnectionContext -> ConnectionPoolConfig -> Bool -> IO (Pool.Pool MMConn)+createPool host port ctx cpc secure =+ Pool.createPool (mkConnection ctx host port secure) closeMMConn (cpStripesCount cpc) (cpIdleConnTimeout cpc) (cpMaxConnCount cpc) initConnectionData :: Hostname -> Port -> ConnectionPoolConfig -> IO ConnectionData initConnectionData host port cpc = do ctx <- initConnectionContext- pool <- createPool host port ctx cpc+ pool <- createPool host port ctx cpc True return (mkConnectionData host port pool ctx) initConnectionDataInsecure :: Hostname -> Port -> ConnectionPoolConfig -> IO ConnectionData initConnectionDataInsecure host port cpc = do ctx <- initConnectionContext- pool <- createPool host port ctx cpc+ pool <- createPool host port ctx cpc False return (mkConnectionDataInsecure host port pool ctx) destroyConnectionData :: ConnectionData -> IO ()