Safe Haskell	None
Language	Haskell2010

Calamity.Types.Model.Channel.Message

Description

A message from a channel

Documentation

data Message Source #

Constructors

Message

Fields

id :: Snowflake Message
channelID :: Snowflake Channel
guildID :: Maybe (Snowflake Guild)
author :: Snowflake User
content :: Text
timestamp :: UTCTime
editedTimestamp :: Maybe UTCTime
tts :: Bool
mentionEveryone :: Bool
mentions :: Vector (Snowflake User)
mentionRoles :: Vector (Snowflake Role)
mentionChannels :: Maybe (Vector (Snowflake Channel))
attachments :: ![Attachment]
embeds :: ![Embed]
reactions :: ![Reaction]
nonce :: Maybe Value
pinned :: Bool
webhookID :: Maybe (Snowflake Webhook)
type_ :: !MessageType
activity :: Maybe Object
application :: Maybe Object
messageReference :: Maybe MessageReference
flags :: Word64
stickers :: Maybe [Object]
referencedMessage :: Maybe Message
interaction :: Maybe Object
components :: [Component]

Instances

Instances details

Show Message Source #
Instance details Defined in Calamity.Types.Model.Channel.Message Methods showsPrec :: Int -> Message -> ShowS # show :: Message -> String # showList :: [Message] -> ShowS #
Generic Message Source #
Instance details Defined in Calamity.Types.Model.Channel.Message Associated Types type Rep Message :: Type -> Type # Methods from :: Message -> Rep Message x # to :: Rep Message x -> Message #
FromJSON Message Source #
Instance details Defined in Calamity.Types.Model.Channel.Message Methods parseJSON :: Value -> Parser Message # parseJSONList :: Value -> Parser [Message] #
TextShow Message Source #
Instance details Defined in Calamity.Types.Model.Channel.Message Methods showbPrec :: Int -> Message -> Builder # showb :: Message -> Builder # showbList :: [Message] -> Builder # showtPrec :: Int -> Message -> Text # showt :: Message -> Text # showtList :: [Message] -> Text # showtlPrec :: Int -> Message -> Text # showtl :: Message -> Text # showtlList :: [Message] -> Text #
Updateable Message Source #
Instance details Defined in Calamity.Internal.Updateable Associated Types type Updated Message Source # Methods update :: Updated Message -> Message -> Message Source #
Tellable Message Source #
Instance details Defined in Calamity.Types.Tellable Methods getChannel :: forall (r :: [(Type -> Type) -> Type -> Type]). (BotC r, Member (Error RestError) r) => Message -> Sem r (Snowflake Channel) Source #
HasID Channel Message Source #
Instance details Defined in Calamity.Types.Model.Channel.Message Methods getID :: Message -> Snowflake Channel Source #
HasID Message Message Source #
Instance details Defined in Calamity.Types.Model.Channel.Message Methods getID :: Message -> Snowflake Message Source #
HasID Message UpdatedMessage Source #
Instance details Defined in Calamity.Types.Model.Channel.UpdatedMessage Methods getID :: UpdatedMessage -> Snowflake Message Source #
HasID Message ReactionEvtData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods getID :: ReactionEvtData -> Snowflake Message Source #
HasID Message LightContext Source #
Instance details Defined in Calamity.Commands.Context Methods getID :: LightContext -> Snowflake Message Source #
HasID Message FullContext Source #
Instance details Defined in Calamity.Commands.Context Methods getID :: FullContext -> Snowflake Message Source #
HasID User Message Source #
Instance details Defined in Calamity.Types.Model.Channel.Message Methods getID :: Message -> Snowflake User Source #
type Rep Message Source #
Instance details Defined in Calamity.Types.Model.Channel.Message type Rep Message = D1 ('MetaData "Message" "Calamity.Types.Model.Channel.Message" "calamity-0.1.30.3-CSMRHBAQ8As2NAXCz4SxiW" 'False) (C1 ('MetaCons "Message" 'PrefixI 'True) ((((S1 ('MetaSel ('Just "id") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake Message)) :: (S1 ('MetaSel ('Just "channelID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake Channel)) :: S1 ('MetaSel ('Just "guildID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe (Snowflake Guild))))) :: (S1 ('MetaSel ('Just "author") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake User)) :: (S1 ('MetaSel ('Just "content") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Text) :: S1 ('MetaSel ('Just "timestamp") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 UTCTime)))) :: ((S1 ('MetaSel ('Just "editedTimestamp") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe UTCTime)) :: (S1 ('MetaSel ('Just "tts") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Bool) :: S1 ('MetaSel ('Just "mentionEveryone") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Bool))) :: ((S1 ('MetaSel ('Just "mentions") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Vector (Snowflake User))) :: S1 ('MetaSel ('Just "mentionRoles") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Vector (Snowflake Role)))) :: (S1 ('MetaSel ('Just "mentionChannels") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe (Vector (Snowflake Channel)))) :: S1 ('MetaSel ('Just "attachments") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 [Attachment]))))) :: (((S1 ('MetaSel ('Just "embeds") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 [Embed]) :: (S1 ('MetaSel ('Just "reactions") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 [Reaction]) :: S1 ('MetaSel ('Just "nonce") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe Value)))) :: ((S1 ('MetaSel ('Just "pinned") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Bool) :: S1 ('MetaSel ('Just "webhookID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe (Snowflake Webhook)))) :: (S1 ('MetaSel ('Just "type_") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 MessageType) :: S1 ('MetaSel ('Just "activity") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe Object))))) :: ((S1 ('MetaSel ('Just "application") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe Object)) :: (S1 ('MetaSel ('Just "messageReference") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe MessageReference)) :: S1 ('MetaSel ('Just "flags") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Word64))) :: ((S1 ('MetaSel ('Just "stickers") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe [Object])) :: S1 ('MetaSel ('Just "referencedMessage") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe Message))) :: (S1 ('MetaSel ('Just "interaction") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe Object)) :: S1 ('MetaSel ('Just "components") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 [Component])))))))
type Updated Message Source #
Instance details Defined in Calamity.Internal.Updateable type Updated Message = UpdatedMessage

data MessageType Source #

Constructors

Default
RecipientAdd
RecipientRemove
Call
ChannelNameChange
ChannelIconChange
ChannelPinnedMessage
GuildMemberJoin
UserPremiumGuildSubscription
UserPremiumGuildSubscriptionTier1
UserPremiumGuildSubscriptionTier2
UserPremiumGuildSubscriptionTier3
ChannelFollowAdd
GuildDiscoveryDisqualified
GuildDiscoveryRequalified
Reply
ApplicationCommmand

Instances

Instances details

Enum MessageType Source #
Instance details Defined in Calamity.Types.Model.Channel.Message Methods succ :: MessageType -> MessageType # pred :: MessageType -> MessageType # toEnum :: Int -> MessageType # fromEnum :: MessageType -> Int # enumFrom :: MessageType -> [MessageType] # enumFromThen :: MessageType -> MessageType -> [MessageType] # enumFromTo :: MessageType -> MessageType -> [MessageType] # enumFromThenTo :: MessageType -> MessageType -> MessageType -> [MessageType] #
Eq MessageType Source #
Instance details Defined in Calamity.Types.Model.Channel.Message Methods (==) :: MessageType -> MessageType -> Bool # (/=) :: MessageType -> MessageType -> Bool #
Show MessageType Source #
Instance details Defined in Calamity.Types.Model.Channel.Message Methods showsPrec :: Int -> MessageType -> ShowS # show :: MessageType -> String # showList :: [MessageType] -> ShowS #
Generic MessageType Source #
Instance details Defined in Calamity.Types.Model.Channel.Message Associated Types type Rep MessageType :: Type -> Type # Methods from :: MessageType -> Rep MessageType x # to :: Rep MessageType x -> MessageType #
FromJSON MessageType Source #
Instance details Defined in Calamity.Types.Model.Channel.Message Methods parseJSON :: Value -> Parser MessageType # parseJSONList :: Value -> Parser [MessageType] #
TextShow MessageType Source #
Instance details Defined in Calamity.Types.Model.Channel.Message Methods showbPrec :: Int -> MessageType -> Builder # showb :: MessageType -> Builder # showbList :: [MessageType] -> Builder # showtPrec :: Int -> MessageType -> Text # showt :: MessageType -> Text # showtList :: [MessageType] -> Text # showtlPrec :: Int -> MessageType -> Text # showtl :: MessageType -> Text # showtlList :: [MessageType] -> Text #
type Rep MessageType Source #
Instance details Defined in Calamity.Types.Model.Channel.Message type Rep MessageType = D1 ('MetaData "MessageType" "Calamity.Types.Model.Channel.Message" "calamity-0.1.30.3-CSMRHBAQ8As2NAXCz4SxiW" 'False) ((((C1 ('MetaCons "Default" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "RecipientAdd" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "RecipientRemove" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Call" 'PrefixI 'False) (U1 :: Type -> Type))) :+: ((C1 ('MetaCons "ChannelNameChange" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "ChannelIconChange" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "ChannelPinnedMessage" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "GuildMemberJoin" 'PrefixI 'False) (U1 :: Type -> Type)))) :+: (((C1 ('MetaCons "UserPremiumGuildSubscription" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "UserPremiumGuildSubscriptionTier1" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "UserPremiumGuildSubscriptionTier2" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "UserPremiumGuildSubscriptionTier3" 'PrefixI 'False) (U1 :: Type -> Type))) :+: ((C1 ('MetaCons "ChannelFollowAdd" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "GuildDiscoveryDisqualified" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "GuildDiscoveryRequalified" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "Reply" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "ApplicationCommmand" 'PrefixI 'False) (U1 :: Type -> Type))))))

data MessageReference Source #

Constructors

MessageReference
Fields messageID :: Maybe (Snowflake Message) channelID :: Maybe (Snowflake Channel) guildID :: Maybe (Snowflake Guild) failIfNotExists :: Bool

Instances

Instances details

Eq MessageReference Source #
Instance details Defined in Calamity.Types.Model.Channel.Message Methods (==) :: MessageReference -> MessageReference -> Bool # (/=) :: MessageReference -> MessageReference -> Bool #
Show MessageReference Source #
Instance details Defined in Calamity.Types.Model.Channel.Message Methods showsPrec :: Int -> MessageReference -> ShowS # show :: MessageReference -> String # showList :: [MessageReference] -> ShowS #
Generic MessageReference Source #
Instance details Defined in Calamity.Types.Model.Channel.Message Associated Types type Rep MessageReference :: Type -> Type # Methods from :: MessageReference -> Rep MessageReference x # to :: Rep MessageReference x -> MessageReference #
ToJSON MessageReference Source #
Instance details Defined in Calamity.Types.Model.Channel.Message Methods toJSON :: MessageReference -> Value # toEncoding :: MessageReference -> Encoding # toJSONList :: [MessageReference] -> Value # toEncodingList :: [MessageReference] -> Encoding #
FromJSON MessageReference Source #
Instance details Defined in Calamity.Types.Model.Channel.Message Methods parseJSON :: Value -> Parser MessageReference # parseJSONList :: Value -> Parser [MessageReference] #
TextShow MessageReference Source #
Instance details Defined in Calamity.Types.Model.Channel.Message Methods showbPrec :: Int -> MessageReference -> Builder # showb :: MessageReference -> Builder # showbList :: [MessageReference] -> Builder # showtPrec :: Int -> MessageReference -> Text # showt :: MessageReference -> Text # showtList :: [MessageReference] -> Text # showtlPrec :: Int -> MessageReference -> Text # showtl :: MessageReference -> Text # showtlList :: [MessageReference] -> Text #
ToMessage MessageReference Source #	Set a `MessageReference` as the message to reply to
Instance details Defined in Calamity.Types.Tellable Methods intoMsg :: MessageReference -> Endo CreateMessageOptions Source #
type Rep MessageReference Source #
Instance details Defined in Calamity.Types.Model.Channel.Message type Rep MessageReference = D1 ('MetaData "MessageReference" "Calamity.Types.Model.Channel.Message" "calamity-0.1.30.3-CSMRHBAQ8As2NAXCz4SxiW" 'False) (C1 ('MetaCons "MessageReference" 'PrefixI 'True) ((S1 ('MetaSel ('Just "messageID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe (Snowflake Message))) :: S1 ('MetaSel ('Just "channelID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe (Snowflake Channel)))) :: (S1 ('MetaSel ('Just "guildID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe (Snowflake Guild))) :*: S1 ('MetaSel ('Just "failIfNotExists") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Bool))))