mattermost-api 40000.0.0 → 40000.0.1

raw patch · 3 files changed

+12/−2 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• CHANGELOG.md +7/−0
• mattermost-api.cabal +1/−1
• src/Network/Mattermost/WebSocket/Types.hs +4/−1

@@ -1,4 +1,11 @@ +40000.0.1+=========++API changes:+ * Added support for the `emoji_added` websocket event type.+ * WEData's JSON parser now permits both null and empty channel IDs.+ 40000.0.0 ========= 

@@ -1,5 +1,5 @@ name:                mattermost-api-version:             40000.0.0+version:             40000.0.1 synopsis:            Client API for Mattermost chat system description:         Client API for Mattermost chat system license:             BSD3

@@ -62,6 +62,7 @@   | WMReactionRemoved   | WMChannelViewed   | WMChannelUpdated+  | WMEmojiAdded   deriving (Read, Show, Eq, Ord)  instance FromJSON WebsocketEventType where@@ -92,6 +93,7 @@     "preferences_deleted" -> return WMPreferenceDeleted     "channel_viewed"     -> return WMChannelViewed     "channel_updated"    -> return WMChannelUpdated+    "emoji_added"        -> return WMEmojiAdded     _                    -> fail ("Unknown websocket message: " ++ show s)  instance ToJSON WebsocketEventType where@@ -121,6 +123,7 @@   toJSON WMAuthenticationChallenge = "authentication_challenge"   toJSON WMChannelViewed           = "channel_viewed"   toJSON WMChannelUpdated          = "channel_updated"+  toJSON WMEmojiAdded              = "emoji_added"  -- @@ -184,7 +187,7 @@  instance FromJSON WEData where   parseJSON = A.withObject "WebSocketEvent Data" $ \o -> do-    wepChannelId          <- o .:? "channel_id"+    wepChannelId          <- nullable (o .: "channel_id")     wepTeamId             <- maybeFail (o .: "team_id")     wepSenderName         <- o .:? "sender_name"     wepUserId             <- o .:? "user_id"