mattermost-api 50200.2.0 → 50200.3.0
raw patch · 3 files changed
+11/−3 lines, 3 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
- Network.Mattermost: Team :: TeamId -> ServerTime -> ServerTime -> ServerTime -> UserText -> UserText -> UserText -> Type -> UserText -> UserText -> Id -> Bool -> Team
+ Network.Mattermost: Team :: TeamId -> ServerTime -> ServerTime -> ServerTime -> UserText -> UserText -> UserText -> Type -> UserText -> UserText -> Maybe Id -> Bool -> Team
- Network.Mattermost: [teamInviteId] :: Team -> Id
+ Network.Mattermost: [teamInviteId] :: Team -> Maybe Id
- Network.Mattermost.Lenses: teamInviteIdL :: Lens' Team Id
+ Network.Mattermost.Lenses: teamInviteIdL :: Lens' Team (Maybe Id)
- Network.Mattermost.Types: Team :: TeamId -> ServerTime -> ServerTime -> ServerTime -> UserText -> UserText -> UserText -> Type -> UserText -> UserText -> Id -> Bool -> Team
+ Network.Mattermost.Types: Team :: TeamId -> ServerTime -> ServerTime -> ServerTime -> UserText -> UserText -> UserText -> Type -> UserText -> UserText -> Maybe Id -> Bool -> Team
- Network.Mattermost.Types: [teamInviteId] :: Team -> Id
+ Network.Mattermost.Types: [teamInviteId] :: Team -> Maybe Id
Files
- CHANGELOG.md +8/−0
- mattermost-api.cabal +1/−1
- src/Network/Mattermost/Types.hs +2/−2
CHANGELOG.md view
@@ -1,4 +1,12 @@ +50200.3.0+=========++Bug fixes:+ * Fixed a bug in the Team JSON decoder where the `invite_id`+ field was required despite it truly being optional (see also+ https://github.com/matterhorn-chat/matterhorn/issues/550)+ 50200.2.0 =========
mattermost-api.cabal view
@@ -1,5 +1,5 @@ name: mattermost-api-version: 50200.2.0+version: 50200.3.0 synopsis: Client API for Mattermost chat system description: Client API for Mattermost chat system. Mattermost is a
src/Network/Mattermost/Types.hs view
@@ -242,7 +242,7 @@ , teamType :: Type , teamCompanyName :: UserText , teamAllowedDomains :: UserText- , teamInviteId :: Id+ , teamInviteId :: Maybe Id , teamAllowOpenInvite :: Bool } deriving (Read, Show, Eq, Ord)@@ -262,7 +262,7 @@ teamType <- v .: "type" teamCompanyName <- v .: "company_name" teamAllowedDomains <- v .: "allowed_domains"- teamInviteId <- v .: "invite_id"+ teamInviteId <- maybeFail (v .: "invite_id") teamAllowOpenInvite <- v .: "allow_open_invite" return Team { .. }