fbmessenger-api 0.1.1.1 → 0.1.2.0
raw patch · 2 files changed
+7/−7 lines, 2 files
Files
fbmessenger-api.cabal view
@@ -1,5 +1,5 @@ name: fbmessenger-api-version: 0.1.1.1+version: 0.1.2.0 synopsis: High-level bindings to Facebook Messenger Platform API description: Please see README.md homepage: https://github.com/mseri/fbmessenger-api-hs#fbmessenger-api@@ -7,7 +7,7 @@ license-file: LICENSE author: Marcello Seri maintainer: marcello.seri@gmail.com-copyright: 2016 Marcello Seri, Federico Rampazzo+copyright: 2016 Marcello Seri category: Web build-type: Simple stability: Experimental
src/Web/FBMessenger/API/Bot/SendAPI.hs view
@@ -54,21 +54,21 @@ -- Servant.Client.BaseUrl graphAPIBaseUrl :: BaseUrl-graphAPIBaseUrl = BaseUrl Https "graph.facebook.com" 443 "/v2.6/me"+graphAPIBaseUrl = BaseUrl Https "graph.facebook.com" 443 "/v2.6" -- | Messenger Platform Send API type FBMessengerSendAPI = - GraphAPIAccessToken :> "messages" + GraphAPIAccessToken :> "me" :> "messages" :> ReqBody '[JSON] SendTextMessageRequest :> Post '[JSON] MessageResponse- :<|> GraphAPIAccessToken :> "messages"+ :<|> GraphAPIAccessToken :> "me" :> "messages" :> MultipartFormDataReqBody (UploadImageMessageRequest FileUpload) :> Post '[JSON] MessageResponse- :<|> GraphAPIAccessToken :> "messages" + :<|> GraphAPIAccessToken :> "me" :> "messages" :> ReqBody '[JSON] SendStructuredMessageRequest :> Post '[JSON] MessageResponse- :<|> GraphAPIAccessToken :> "subscribed_apps"+ :<|> GraphAPIAccessToken :> "me" :> "subscribed_apps" :> Post '[JSON] SubscriptionResponse :<|> GraphAPIAccessToken :> Capture "page_id" Text :> "thread_settings" :> ReqBody '[JSON] WelcomeMessageRequest