mattermost-api 50200.0.0 → 50200.0.1
raw patch · 3 files changed
+11/−4 lines, 3 filesnew-uploaderPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
API changes (from Hackage documentation)
- Network.Mattermost.Endpoints: PostQuery :: Maybe Int -> Maybe Int -> Maybe UTCTime -> Maybe PostId -> Maybe PostId -> PostQuery
+ Network.Mattermost.Endpoints: PostQuery :: Maybe Int -> Maybe Int -> Maybe ServerTime -> Maybe PostId -> Maybe PostId -> PostQuery
- Network.Mattermost.Endpoints: [postQuerySince] :: PostQuery -> Maybe UTCTime
+ Network.Mattermost.Endpoints: [postQuerySince] :: PostQuery -> Maybe ServerTime
Files
- CHANGELOG.md +8/−0
- mattermost-api.cabal +1/−1
- src/Network/Mattermost/Endpoints.hs +2/−3
CHANGELOG.md view
@@ -1,3 +1,11 @@+50200.0.1+=========++Bug fixes:+ * Fix the specification of the QuerySince time for fetching channel+ posts. The previous version generated a user-displayable date-time+ which contained spaces and created a malformed URL as well as not+ being in the proper format for the server. 50200.0.0 =========
mattermost-api.cabal view
@@ -1,5 +1,5 @@ name: mattermost-api-version: 50200.0.0+version: 50200.0.1 synopsis: Client API for Mattermost chat system description: Client API for Mattermost chat system license: BSD3
src/Network/Mattermost/Endpoints.hs view
@@ -9,7 +9,6 @@ import Data.Sequence (Seq) import Data.Text (Text) import qualified Data.Text as T-import Data.Time.Clock ( UTCTime ) import qualified Network.HTTP.Base as HTTP import qualified Network.HTTP.Headers as HTTP import Text.Printf (printf)@@ -746,7 +745,7 @@ data PostQuery = PostQuery { postQueryPage :: Maybe Int , postQueryPerPage :: Maybe Int- , postQuerySince :: Maybe UTCTime+ , postQuerySince :: Maybe ServerTime , postQueryBefore :: Maybe PostId , postQueryAfter :: Maybe PostId }@@ -765,7 +764,7 @@ mkQueryString [ sequence ("page", fmap show postQueryPage) , sequence ("per_page", fmap show postQueryPerPage)- , sequence ("since", fmap show postQuerySince)+ , sequence ("since", fmap (show . timeToServer) postQuerySince) , sequence ("before", fmap (T.unpack . idString) postQueryBefore) , sequence ("after", fmap (T.unpack . idString) postQueryAfter) ]