Calamity.Types.Model.Channel.Message

A message from a channel

Documentation

data Message

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)
• attachments :: [Attachment]
• embeds :: [Embed]
• reactions :: [Reaction]
• nonce :: Maybe (Snowflake Message)
• pinned :: Bool
• webhookID :: Maybe (Snowflake ())
• type_ :: MessageType

Instances

Eq Message

Defined in Calamity.Types.Model.Channel.Message

Methods

(==) :: Message -> Message -> Bool

(/=) :: Message -> Message -> Bool

Show Message

Defined in Calamity.Types.Model.Channel.Message

Methods

showsPrec :: Int -> Message -> ShowS

show :: Message -> String

showList :: [Message] -> ShowS

Generic Message

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

TextShow Message

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

FromJSON Message

Defined in Calamity.Types.Model.Channel.Message

Methods

parseJSON :: Value -> Parser Message

parseJSONList :: Value -> Parser [Message]

ToJSON Message

Defined in Calamity.Types.Model.Channel.Message

Methods

toJSON :: Message -> Value

toEncoding :: Message -> Encoding

toJSONList :: [Message] -> Value

toEncodingList :: [Message] -> Encoding

Updateable Message

Defined in Calamity.Internal.Updateable

Associated Types

type Updated Message

Methods

update :: Updated Message -> Message -> Message

Tellable Message

Defined in Calamity.Types.Tellable

Methods

getChannel :: forall (r :: [(Type -> Type) -> Type -> Type]). (BotC r, Member (Error RestError) r) => Message -> Sem r (Snowflake Channel)

HasID Channel Message

Defined in Calamity.Types.Model.Channel.Message

Methods

getID :: Message -> Snowflake Channel

HasID Message UpdatedMessage

Defined in Calamity.Types.Model.Channel.Message

Methods

getID :: UpdatedMessage -> Snowflake Message

HasID Message Message

Defined in Calamity.Types.Model.Channel.Message

Methods

getID :: Message -> Snowflake Message

HasID Message Reaction

Defined in Calamity.Types.Model.Channel.Reaction

Methods

getID :: Reaction -> Snowflake Message

HasID User Message

Defined in Calamity.Types.Model.Channel.Message

Methods

getID :: Message -> Snowflake User

type Rep Message

Defined in Calamity.Types.Model.Channel.Message

type Rep Message = D1 ('MetaData "Message" "Calamity.Types.Model.Channel.Message" "calamity-0.1.9.4-inplace" 'False) (C1 ('MetaCons "Message" 'PrefixI 'True) ((((S1 ('MetaSel ('Just "id") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Snowflake Message)) :*: S1 ('MetaSel ('Just "channelID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Snowflake Channel))) :*: (S1 ('MetaSel ('Just "guildID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe (Snowflake Guild))) :*: S1 ('MetaSel ('Just "author") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Snowflake User)))) :*: ((S1 ('MetaSel ('Just "content") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "timestamp") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UTCTime)) :*: (S1 ('MetaSel ('Just "editedTimestamp") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe UTCTime)) :*: (S1 ('MetaSel ('Just "tts") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool) :*: S1 ('MetaSel ('Just "mentionEveryone") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool))))) :*: (((S1 ('MetaSel ('Just "mentions") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Vector (Snowflake User))) :*: S1 ('MetaSel ('Just "mentionRoles") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Vector (Snowflake Role)))) :*: (S1 ('MetaSel ('Just "attachments") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [Attachment]) :*: S1 ('MetaSel ('Just "embeds") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [Embed]))) :*: ((S1 ('MetaSel ('Just "reactions") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [Reaction]) :*: S1 ('MetaSel ('Just "nonce") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe (Snowflake Message)))) :*: (S1 ('MetaSel ('Just "pinned") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool) :*: (S1 ('MetaSel ('Just "webhookID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe (Snowflake ()))) :*: S1 ('MetaSel ('Just "type_") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 MessageType)))))))

type Updated Message

Defined in Calamity.Internal.Updateable

type Updated Message = UpdatedMessage

data UpdatedMessage

Constructors

UpdatedMessage

Fields

• id :: Snowflake Message
• channelID :: Snowflake Channel
• content :: Maybe Text
• editedTimestamp :: Maybe UTCTime
• tts :: Maybe Bool
• mentionEveryone :: Maybe Bool
• mentions :: Maybe (Vector (Snowflake User))
• mentionRoles :: Maybe (Vector (Snowflake Role))
• attachments :: Maybe [Attachment]
• embeds :: Maybe [Embed]
• reactions :: Maybe [Reaction]
• pinned :: Maybe Bool

Instances

Eq UpdatedMessage

Defined in Calamity.Types.Model.Channel.Message

Methods

(==) :: UpdatedMessage -> UpdatedMessage -> Bool

(/=) :: UpdatedMessage -> UpdatedMessage -> Bool

Show UpdatedMessage

Defined in Calamity.Types.Model.Channel.Message

Methods

showsPrec :: Int -> UpdatedMessage -> ShowS

show :: UpdatedMessage -> String

showList :: [UpdatedMessage] -> ShowS

Generic UpdatedMessage

Defined in Calamity.Types.Model.Channel.Message

Associated Types

type Rep UpdatedMessage :: Type -> Type

Methods

from :: UpdatedMessage -> Rep UpdatedMessage x

to :: Rep UpdatedMessage x -> UpdatedMessage

TextShow UpdatedMessage

Defined in Calamity.Types.Model.Channel.Message

Methods

showbPrec :: Int -> UpdatedMessage -> Builder

showb :: UpdatedMessage -> Builder

showbList :: [UpdatedMessage] -> Builder

showtPrec :: Int -> UpdatedMessage -> Text

showt :: UpdatedMessage -> Text

showtList :: [UpdatedMessage] -> Text

showtlPrec :: Int -> UpdatedMessage -> Text

showtl :: UpdatedMessage -> Text

showtlList :: [UpdatedMessage] -> Text

FromJSON UpdatedMessage

Defined in Calamity.Types.Model.Channel.Message

Methods

parseJSON :: Value -> Parser UpdatedMessage

parseJSONList :: Value -> Parser [UpdatedMessage]

HasID Channel UpdatedMessage

Defined in Calamity.Types.Model.Channel.Message

Methods

getID :: UpdatedMessage -> Snowflake Channel

HasID Message UpdatedMessage

Defined in Calamity.Types.Model.Channel.Message

Methods

getID :: UpdatedMessage -> Snowflake Message

type Rep UpdatedMessage

Defined in Calamity.Types.Model.Channel.Message

type Rep UpdatedMessage = D1 ('MetaData "UpdatedMessage" "Calamity.Types.Model.Channel.Message" "calamity-0.1.9.4-inplace" 'False) (C1 ('MetaCons "UpdatedMessage" 'PrefixI 'True) (((S1 ('MetaSel ('Just "id") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Snowflake Message)) :*: (S1 ('MetaSel ('Just "channelID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Snowflake Channel)) :*: S1 ('MetaSel ('Just "content") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)))) :*: (S1 ('MetaSel ('Just "editedTimestamp") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe UTCTime)) :*: (S1 ('MetaSel ('Just "tts") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool)) :*: S1 ('MetaSel ('Just "mentionEveryone") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool))))) :*: ((S1 ('MetaSel ('Just "mentions") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe (Vector (Snowflake User)))) :*: (S1 ('MetaSel ('Just "mentionRoles") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe (Vector (Snowflake Role)))) :*: S1 ('MetaSel ('Just "attachments") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe [Attachment])))) :*: (S1 ('MetaSel ('Just "embeds") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe [Embed])) :*: (S1 ('MetaSel ('Just "reactions") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe [Reaction])) :*: S1 ('MetaSel ('Just "pinned") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool)))))))

data MessageType

Constructors

Default

RecipientAdd

RecipientRemove

Call

ChannelNameChange

ChannelIconChange

ChannelPinnedMessage

GuildMemberJoin

Instances

Enum MessageType

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

Defined in Calamity.Types.Model.Channel.Message

Methods

(==) :: MessageType -> MessageType -> Bool

(/=) :: MessageType -> MessageType -> Bool

Show MessageType

Defined in Calamity.Types.Model.Channel.Message

Methods

showsPrec :: Int -> MessageType -> ShowS

show :: MessageType -> String

showList :: [MessageType] -> ShowS

Generic MessageType

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

TextShow MessageType

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

FromJSON MessageType

Defined in Calamity.Types.Model.Channel.Message

Methods

parseJSON :: Value -> Parser MessageType

parseJSONList :: Value -> Parser [MessageType]

ToJSON MessageType

Defined in Calamity.Types.Model.Channel.Message

Methods

toJSON :: MessageType -> Value

toEncoding :: MessageType -> Encoding

toJSONList :: [MessageType] -> Value

toEncodingList :: [MessageType] -> Encoding

type Rep MessageType

Defined in Calamity.Types.Model.Channel.Message

type Rep MessageType = D1 ('MetaData "MessageType" "Calamity.Types.Model.Channel.Message" "calamity-0.1.9.4-inplace" '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))))