telegram-api 0.6.0.1 → 0.6.0.2
raw patch · 2 files changed
+4/−4 lines, 2 filesdep ~aesonPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: aeson
API changes (from Hackage documentation)
Files
- telegram-api.cabal +2/−2
- test/MainSpec.hs +2/−2
telegram-api.cabal view
@@ -1,5 +1,5 @@ name: telegram-api-version: 0.6.0.1+version: 0.6.0.2 synopsis: Telegram Bot API bindings description: High-level bindings to the Telegram Bot API homepage: http://github.com/klappvisor/haskell-telegram-api#readme@@ -66,7 +66,7 @@ , JsonSpec , UpdatesSpec build-depends: base- , aeson == 1.0.*+ , aeson >= 1.0 && < 1.2 , hjpath , ansi-wl-pprint , http-client >= 0.5 && < 0.6
test/MainSpec.hs view
@@ -168,7 +168,7 @@ let sticker = sendStickerRequest chatId "BQADAgADGgADkWgMAAGXlYGBiM_d2wI" Right Response { result = Message { sticker = Just sticker } } <- sendSticker token sticker manager- sticker_file_id sticker `shouldBe` "BQADAgADGgADkWgMAAGXlYGBiM_d2wI"+ sticker_file_id sticker `shouldBe` "CAADAgADGgADkWgMAAGXlYGBiM_d2wI" --"BQADAgADGgADkWgMAAGXlYGBiM_d2wI" it "should upload sticker" $ do let fileUpload = localFileUpload (testFile "haskell-logo.webp") stickerReq = uploadStickerRequest chatId fileUpload@@ -253,7 +253,7 @@ it "should get file" $ do Right Response { result = file } <- getFile token "AAQEABMXDZEwAARC0Kj3twkzNcMkAAIC" manager- fmap (T.take 10) (file_path file) `shouldBe` Just "thumb/file"+ fmap (T.take 10) (file_path file) `shouldBe` Just "thumbnails" it "should return error" $ do Left FailureResponse { responseStatus = Status { statusMessage = msg } } <-