Safe Haskell | None |
---|---|
Language | Haskell2010 |
Sending stuff
Documentation
type ForwardMessage = Base :> ("forwardMessage" :> (ReqBody '[JSON] FwdMessage :> Res)) Source #
type SendPhoto' photo = Base :> ("sendPhoto" :> (QueryR "chat_id" ChatId :> (MultipartForm Mem Photo :> (QueryParam "caption" Text :> MessageR)))) Source #
type SendAudio' audio = Base :> ("sendAudio" :> (QueryR "chat_id" ChatId :> (MultipartForm Mem Audio :> (QueryParam "caption" Text :> (QueryParam "duration" Integer :> (QueryParam "performer" Text :> (QueryParam "title" Text :> MessageR))))))) Source #
type SendDocument = Base :> ("sendDocument" :> (ReqBody '[JSON] (DocMessage Text) :> Res)) Source #
type SendDocument' doc = Base :> ("sendDocument" :> (QueryR "chat_id" ChatId :> (MultipartForm Mem Doc :> (QueryParam "caption" Text :> MessageR)))) Source #
type SendVideo' = Base :> ("sendVideo" :> (QueryR "chat_id" ChatId :> (MultipartForm Mem Video :> (QueryParam "duration" Integer :> (QueryParam "width" Integer :> (QueryParam "height" Integer :> (QueryParam "caption" Text :> (QueryParam "supports_streaming" Bool :> MessageR)))))))) Source #
type SendAnimation = Base :> ("sendAnimation" :> (ReqBody '[JSON] (AnimationMessage Text) :> Res)) Source #
type SendAnimation' = Base :> ("sendAnimation" :> (QueryR "chat_id" ChatId :> (MultipartForm Mem Animation :> (QueryParam "duration" Integer :> (QueryParam "width" Integer :> (QueryParam "height" Integer :> (QueryParam "caption" Text :> MessageR))))))) Source #
type SendVoice' = Base :> ("sendVoice" :> (QueryR "chat_id" ChatId :> (MultipartForm Mem Voice :> (QueryParam "duration" Integer :> (QueryParam "caption" Text :> MessageR))))) Source #
type SendVideoNote = Base :> ("sendVideoNote" :> (ReqBody '[JSON] (VNMessage Text) :> Res)) Source #
type SendVideoNote' = Base :> ("sendVideoNote" :> (QueryR "chat_id" ChatId :> (MultipartForm Mem VideoNote :> (QueryParam "duration" Integer :> (QueryParam "length" Integer :> MessageR))))) Source #
type SendMediaGroup = Base :> ("sendMediaGroup" :> (QueryR "chat_id" ChatId :> (CompoundParams Mem "media" VideoOrPhoto :> (QueryParam "disable_notification" Bool :> (QueryParam "reply_to_message_id" Integer :> Get '[JSON] (ReqResult [Message])))))) Source #
type SendLocation = Base :> ("sendLocation" :> (ReqBody '[JSON] LocationMessage :> Res)) Source #
type EditMessageLiveLocation = Base :> ("editMessageLiveLocation" :> (ReqBody '[JSON] LocationEdit :> Get '[JSON] (ReqResult (ReqEither Message Bool)))) Source #
type StopMessageLiveLocation = Base :> ("stopMessageLiveLocation" :> (ReqBody '[JSON] LocationStop :> Get '[JSON] (ReqResult (ReqEither Message Bool)))) Source #
type SendContact = Base :> ("sendContact" :> (ReqBody '[JSON] ContactMessage :> Res)) Source #
type SendChatAction = Base :> ("sendChatAction" :> (ReqBody '[JSON] ChatAction :> Get '[JSON] (ReqResult Bool))) Source #
type SendSticker = Base :> ("sendSticker" :> (ReqBody '[JSON] StickerMessage :> Res)) Source #
type SendSticker' sticker = Base :> ("sendSticker" :> (QueryR "chat_id" ChatId :> (MultipartForm Mem Sticker :> MessageR'))) Source #
Instances
data FwdMessage Source #
Instances
data PhotoMessage a Source #
Instances
data AudioMessage a Source #
Instances
data DocMessage a Source #
Instances
data VidMessage a Source #
Instances
data AnimationMessage a Source #
Instances
data VoiceMessage a Source #
Instances
Instances
data LocationEdit Source #
Instances
data LocationStop Source #
Instances
data VenueMessage Source #
Instances
data ContactMessage Source #
Instances
data PollMessage Source #
Instances
data DiceMessage Source #
Instances
data ChatAction Source #
Instances
data StickerMessage Source #