{-# LANGUAGE DataKinds #-}
{-# LANGUAGE TypeApplications #-}
{-# LANGUAGE TypeOperators #-}
module Telegram.Bot.API.Methods.SetChatTitle where
import Data.Proxy
import Data.Text (Text)
import Servant.API
import Servant.Client hiding (Response)
import Telegram.Bot.API.MakingRequests
import Telegram.Bot.API.Types
type SetChatTitle = "setChatTitle"
:> RequiredQueryParam "chat_id" SomeChatId
:> RequiredQueryParam "title" Text
:> Post '[JSON] (Response Bool)
setChatTitle :: SomeChatId
-> Text
-> ClientM (Response Bool)
setChatTitle :: SomeChatId -> Text -> ClientM (Response Bool)
setChatTitle = forall api.
HasClient ClientM api =>
Proxy api -> Client ClientM api
client (forall {k} (t :: k). Proxy t
Proxy @SetChatTitle)