Safe Haskell	None
Language	Haskell2010

Calamity.Gateway.DispatchEvents

Description

module containing all dispatch events

Documentation

data CalamityEvent Source #

Constructors

Dispatch
Fields Int The shard that pushed this event DispatchData The attached data
forall (a :: Type).Typeable a => Custom a	The data sent to the custom event
ShutDown

data DispatchData Source #

Constructors

Ready !ReadyData
Resumed
ChannelCreate !Channel
ChannelUpdate !Channel
ChannelDelete !Channel
ChannelPinsUpdate !ChannelPinsUpdateData
GuildCreate !Guild
GuildUpdate !UpdatedGuild
GuildDelete !UnavailableGuild
GuildBanAdd !BanData
GuildBanRemove !BanData
GuildEmojisUpdate !GuildEmojisUpdateData
GuildIntegrationsUpdate !GuildIntegrationsUpdateData
GuildMemberAdd !(Snowflake Guild) !Member
GuildMemberRemove !GuildMemberRemoveData
GuildMemberUpdate !GuildMemberUpdateData
GuildMembersChunk !GuildMembersChunkData
GuildRoleCreate !GuildRoleData
GuildRoleUpdate !GuildRoleData
GuildRoleDelete !GuildRoleDeleteData
InviteCreate !InviteCreateData
InviteDelete !InviteDeleteData
MessageCreate !Message !(Maybe User) !(Maybe Member)
MessageUpdate !UpdatedMessage !(Maybe User) !(Maybe Member)
MessageDelete !MessageDeleteData
MessageDeleteBulk !MessageDeleteBulkData
MessageReactionAdd !ReactionEvtData
MessageReactionRemove !ReactionEvtData
MessageReactionRemoveAll !MessageReactionRemoveAllData
PresenceUpdate !PresenceUpdateData
TypingStart !TypingStartData
UserUpdate !User
VoiceStateUpdate !VoiceState
VoiceServerUpdate !VoiceServerUpdateData
WebhooksUpdate !WebhooksUpdateData
InteractionCreate !Interaction

Instances

Instances details

Show DispatchData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> DispatchData -> ShowS # show :: DispatchData -> String # showList :: [DispatchData] -> ShowS #
Generic DispatchData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep DispatchData :: Type -> Type # Methods from :: DispatchData -> Rep DispatchData x # to :: Rep DispatchData x -> DispatchData #
CtorName DispatchData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods ctorName :: DispatchData -> String Source #
type Rep DispatchData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep DispatchData = D1 ('MetaData "DispatchData" "Calamity.Gateway.DispatchEvents" "calamity-0.3.0.0-inplace" 'False) (((((C1 ('MetaCons "Ready" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 ReadyData)) :+: C1 ('MetaCons "Resumed" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "ChannelCreate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 Channel)) :+: C1 ('MetaCons "ChannelUpdate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 Channel)))) :+: ((C1 ('MetaCons "ChannelDelete" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 Channel)) :+: C1 ('MetaCons "ChannelPinsUpdate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 ChannelPinsUpdateData))) :+: (C1 ('MetaCons "GuildCreate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 Guild)) :+: (C1 ('MetaCons "GuildUpdate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 UpdatedGuild)) :+: C1 ('MetaCons "GuildDelete" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 UnavailableGuild)))))) :+: (((C1 ('MetaCons "GuildBanAdd" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 BanData)) :+: C1 ('MetaCons "GuildBanRemove" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 BanData))) :+: (C1 ('MetaCons "GuildEmojisUpdate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 GuildEmojisUpdateData)) :+: C1 ('MetaCons "GuildIntegrationsUpdate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 GuildIntegrationsUpdateData)))) :+: ((C1 ('MetaCons "GuildMemberAdd" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (Snowflake Guild)) :: S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 Member)) :+: C1 ('MetaCons "GuildMemberRemove" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 GuildMemberRemoveData))) :+: (C1 ('MetaCons "GuildMemberUpdate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 GuildMemberUpdateData)) :+: (C1 ('MetaCons "GuildMembersChunk" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 GuildMembersChunkData)) :+: C1 ('MetaCons "GuildRoleCreate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 GuildRoleData))))))) :+: ((((C1 ('MetaCons "GuildRoleUpdate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 GuildRoleData)) :+: C1 ('MetaCons "GuildRoleDelete" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 GuildRoleDeleteData))) :+: (C1 ('MetaCons "InviteCreate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 InviteCreateData)) :+: C1 ('MetaCons "InviteDelete" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 InviteDeleteData)))) :+: ((C1 ('MetaCons "MessageCreate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 Message) :: (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (Maybe User)) :: S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (Maybe Member)))) :+: C1 ('MetaCons "MessageUpdate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 UpdatedMessage) :: (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (Maybe User)) :*: S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (Maybe Member))))) :+: (C1 ('MetaCons "MessageDelete" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 MessageDeleteData)) :+: (C1 ('MetaCons "MessageDeleteBulk" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 MessageDeleteBulkData)) :+: C1 ('MetaCons "MessageReactionAdd" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 ReactionEvtData)))))) :+: (((C1 ('MetaCons "MessageReactionRemove" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 ReactionEvtData)) :+: C1 ('MetaCons "MessageReactionRemoveAll" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 MessageReactionRemoveAllData))) :+: (C1 ('MetaCons "PresenceUpdate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 PresenceUpdateData)) :+: C1 ('MetaCons "TypingStart" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 TypingStartData)))) :+: ((C1 ('MetaCons "UserUpdate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 User)) :+: C1 ('MetaCons "VoiceStateUpdate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 VoiceState))) :+: (C1 ('MetaCons "VoiceServerUpdate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 VoiceServerUpdateData)) :+: (C1 ('MetaCons "WebhooksUpdate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 WebhooksUpdateData)) :+: C1 ('MetaCons "InteractionCreate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 Interaction))))))))

data ReadyData Source #

Constructors

ReadyData
Fields v :: Integer user :: User guilds :: [UnavailableGuild] sessionID :: Text

Instances

Instances details

Show ReadyData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> ReadyData -> ShowS # show :: ReadyData -> String # showList :: [ReadyData] -> ShowS #
Generic ReadyData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep ReadyData :: Type -> Type # Methods from :: ReadyData -> Rep ReadyData x # to :: Rep ReadyData x -> ReadyData #
FromJSON ReadyData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods parseJSON :: Value -> Parser ReadyData # parseJSONList :: Value -> Parser [ReadyData] #
type Rep ReadyData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep ReadyData = D1 ('MetaData "ReadyData" "Calamity.Gateway.DispatchEvents" "calamity-0.3.0.0-inplace" 'False) (C1 ('MetaCons "ReadyData" 'PrefixI 'True) ((S1 ('MetaSel ('Just "v") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Integer) :: S1 ('MetaSel ('Just "user") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 User)) :: (S1 ('MetaSel ('Just "guilds") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 [UnavailableGuild]) :*: S1 ('MetaSel ('Just "sessionID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Text))))

data ChannelPinsUpdateData Source #

Constructors

ChannelPinsUpdateData
Fields channelID :: Snowflake Channel lastPinTimestamp :: Maybe UTCTime

Instances

Instances details

Show ChannelPinsUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> ChannelPinsUpdateData -> ShowS # show :: ChannelPinsUpdateData -> String # showList :: [ChannelPinsUpdateData] -> ShowS #
Generic ChannelPinsUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep ChannelPinsUpdateData :: Type -> Type # Methods from :: ChannelPinsUpdateData -> Rep ChannelPinsUpdateData x # to :: Rep ChannelPinsUpdateData x -> ChannelPinsUpdateData #
FromJSON ChannelPinsUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods parseJSON :: Value -> Parser ChannelPinsUpdateData # parseJSONList :: Value -> Parser [ChannelPinsUpdateData] #
type Rep ChannelPinsUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep ChannelPinsUpdateData = D1 ('MetaData "ChannelPinsUpdateData" "Calamity.Gateway.DispatchEvents" "calamity-0.3.0.0-inplace" 'False) (C1 ('MetaCons "ChannelPinsUpdateData" 'PrefixI 'True) (S1 ('MetaSel ('Just "channelID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake Channel)) :*: S1 ('MetaSel ('Just "lastPinTimestamp") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe UTCTime))))

data GuildEmojisUpdateData Source #

Constructors

GuildEmojisUpdateData
Fields guildID :: Snowflake Guild emojis :: [Emoji]

Instances

Instances details

Show GuildEmojisUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> GuildEmojisUpdateData -> ShowS # show :: GuildEmojisUpdateData -> String # showList :: [GuildEmojisUpdateData] -> ShowS #
Generic GuildEmojisUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep GuildEmojisUpdateData :: Type -> Type # Methods from :: GuildEmojisUpdateData -> Rep GuildEmojisUpdateData x # to :: Rep GuildEmojisUpdateData x -> GuildEmojisUpdateData #
FromJSON GuildEmojisUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods parseJSON :: Value -> Parser GuildEmojisUpdateData # parseJSONList :: Value -> Parser [GuildEmojisUpdateData] #
type Rep GuildEmojisUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep GuildEmojisUpdateData = D1 ('MetaData "GuildEmojisUpdateData" "Calamity.Gateway.DispatchEvents" "calamity-0.3.0.0-inplace" 'False) (C1 ('MetaCons "GuildEmojisUpdateData" 'PrefixI 'True) (S1 ('MetaSel ('Just "guildID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake Guild)) :*: S1 ('MetaSel ('Just "emojis") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 [Emoji])))

newtype GuildIntegrationsUpdateData Source #

Constructors

GuildIntegrationsUpdateData
Fields guildID :: Snowflake Guild

Instances

Instances details

Show GuildIntegrationsUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> GuildIntegrationsUpdateData -> ShowS # show :: GuildIntegrationsUpdateData -> String # showList :: [GuildIntegrationsUpdateData] -> ShowS #
Generic GuildIntegrationsUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep GuildIntegrationsUpdateData :: Type -> Type # Methods from :: GuildIntegrationsUpdateData -> Rep GuildIntegrationsUpdateData x # to :: Rep GuildIntegrationsUpdateData x -> GuildIntegrationsUpdateData #
FromJSON GuildIntegrationsUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods parseJSON :: Value -> Parser GuildIntegrationsUpdateData # parseJSONList :: Value -> Parser [GuildIntegrationsUpdateData] #
type Rep GuildIntegrationsUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep GuildIntegrationsUpdateData = Rep (Snowflake Guild)

data GuildMemberRemoveData Source #

Constructors

GuildMemberRemoveData
Fields guildID :: Snowflake Guild user :: User

Instances

Instances details

Show GuildMemberRemoveData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> GuildMemberRemoveData -> ShowS # show :: GuildMemberRemoveData -> String # showList :: [GuildMemberRemoveData] -> ShowS #
Generic GuildMemberRemoveData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep GuildMemberRemoveData :: Type -> Type # Methods from :: GuildMemberRemoveData -> Rep GuildMemberRemoveData x # to :: Rep GuildMemberRemoveData x -> GuildMemberRemoveData #
FromJSON GuildMemberRemoveData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods parseJSON :: Value -> Parser GuildMemberRemoveData # parseJSONList :: Value -> Parser [GuildMemberRemoveData] #
type Rep GuildMemberRemoveData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep GuildMemberRemoveData = D1 ('MetaData "GuildMemberRemoveData" "Calamity.Gateway.DispatchEvents" "calamity-0.3.0.0-inplace" 'False) (C1 ('MetaCons "GuildMemberRemoveData" 'PrefixI 'True) (S1 ('MetaSel ('Just "guildID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake Guild)) :*: S1 ('MetaSel ('Just "user") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 User)))

data GuildMemberUpdateData Source #

Constructors

GuildMemberUpdateData
Fields guildID :: Snowflake Guild roles :: AesonVector (Snowflake Role) user :: User nick :: Maybe Text

Instances

Instances details

Show GuildMemberUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> GuildMemberUpdateData -> ShowS # show :: GuildMemberUpdateData -> String # showList :: [GuildMemberUpdateData] -> ShowS #
Generic GuildMemberUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep GuildMemberUpdateData :: Type -> Type # Methods from :: GuildMemberUpdateData -> Rep GuildMemberUpdateData x # to :: Rep GuildMemberUpdateData x -> GuildMemberUpdateData #
FromJSON GuildMemberUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods parseJSON :: Value -> Parser GuildMemberUpdateData # parseJSONList :: Value -> Parser [GuildMemberUpdateData] #
type Rep GuildMemberUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep GuildMemberUpdateData = D1 ('MetaData "GuildMemberUpdateData" "Calamity.Gateway.DispatchEvents" "calamity-0.3.0.0-inplace" 'False) (C1 ('MetaCons "GuildMemberUpdateData" 'PrefixI 'True) ((S1 ('MetaSel ('Just "guildID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake Guild)) :: S1 ('MetaSel ('Just "roles") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (AesonVector (Snowflake Role)))) :: (S1 ('MetaSel ('Just "user") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 User) :*: S1 ('MetaSel ('Just "nick") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe Text)))))

data GuildMembersChunkData Source #

Constructors

GuildMembersChunkData
Fields guildID :: Snowflake Guild members :: [Member]

Instances

Instances details

Show GuildMembersChunkData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> GuildMembersChunkData -> ShowS # show :: GuildMembersChunkData -> String # showList :: [GuildMembersChunkData] -> ShowS #
Generic GuildMembersChunkData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep GuildMembersChunkData :: Type -> Type # Methods from :: GuildMembersChunkData -> Rep GuildMembersChunkData x # to :: Rep GuildMembersChunkData x -> GuildMembersChunkData #
FromJSON GuildMembersChunkData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods parseJSON :: Value -> Parser GuildMembersChunkData # parseJSONList :: Value -> Parser [GuildMembersChunkData] #
type Rep GuildMembersChunkData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep GuildMembersChunkData = D1 ('MetaData "GuildMembersChunkData" "Calamity.Gateway.DispatchEvents" "calamity-0.3.0.0-inplace" 'False) (C1 ('MetaCons "GuildMembersChunkData" 'PrefixI 'True) (S1 ('MetaSel ('Just "guildID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake Guild)) :*: S1 ('MetaSel ('Just "members") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 [Member])))

data GuildRoleData Source #

Constructors

GuildRoleData
Fields guildID :: Snowflake Guild role :: Role

Instances

Instances details

Show GuildRoleData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> GuildRoleData -> ShowS # show :: GuildRoleData -> String # showList :: [GuildRoleData] -> ShowS #
Generic GuildRoleData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep GuildRoleData :: Type -> Type # Methods from :: GuildRoleData -> Rep GuildRoleData x # to :: Rep GuildRoleData x -> GuildRoleData #
FromJSON GuildRoleData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods parseJSON :: Value -> Parser GuildRoleData # parseJSONList :: Value -> Parser [GuildRoleData] #
type Rep GuildRoleData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep GuildRoleData = D1 ('MetaData "GuildRoleData" "Calamity.Gateway.DispatchEvents" "calamity-0.3.0.0-inplace" 'False) (C1 ('MetaCons "GuildRoleData" 'PrefixI 'True) (S1 ('MetaSel ('Just "guildID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake Guild)) :*: S1 ('MetaSel ('Just "role") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Role)))

data GuildRoleDeleteData Source #

Constructors

GuildRoleDeleteData
Fields guildID :: Snowflake Guild roleID :: Snowflake Role

Instances

Instances details

Show GuildRoleDeleteData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> GuildRoleDeleteData -> ShowS # show :: GuildRoleDeleteData -> String # showList :: [GuildRoleDeleteData] -> ShowS #
Generic GuildRoleDeleteData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep GuildRoleDeleteData :: Type -> Type # Methods from :: GuildRoleDeleteData -> Rep GuildRoleDeleteData x # to :: Rep GuildRoleDeleteData x -> GuildRoleDeleteData #
FromJSON GuildRoleDeleteData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods parseJSON :: Value -> Parser GuildRoleDeleteData # parseJSONList :: Value -> Parser [GuildRoleDeleteData] #
type Rep GuildRoleDeleteData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep GuildRoleDeleteData = D1 ('MetaData "GuildRoleDeleteData" "Calamity.Gateway.DispatchEvents" "calamity-0.3.0.0-inplace" 'False) (C1 ('MetaCons "GuildRoleDeleteData" 'PrefixI 'True) (S1 ('MetaSel ('Just "guildID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake Guild)) :*: S1 ('MetaSel ('Just "roleID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake Role))))

data InviteCreateData Source #

Constructors

InviteCreateData
Fields channelID :: Snowflake Channel code :: Text createdAt :: UTCTime guildID :: Maybe (Snowflake Guild) inviter :: Maybe (Snowflake User) maxAge :: Int maxUses :: Int targetUser :: Maybe (Snowflake User) targetUserType :: Maybe Integer temporary :: Bool uses :: Integer

Instances

Instances details

Show InviteCreateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> InviteCreateData -> ShowS # show :: InviteCreateData -> String # showList :: [InviteCreateData] -> ShowS #
Generic InviteCreateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep InviteCreateData :: Type -> Type # Methods from :: InviteCreateData -> Rep InviteCreateData x # to :: Rep InviteCreateData x -> InviteCreateData #
FromJSON InviteCreateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods parseJSON :: Value -> Parser InviteCreateData # parseJSONList :: Value -> Parser [InviteCreateData] #
type Rep InviteCreateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep InviteCreateData = D1 ('MetaData "InviteCreateData" "Calamity.Gateway.DispatchEvents" "calamity-0.3.0.0-inplace" 'False) (C1 ('MetaCons "InviteCreateData" 'PrefixI 'True) (((S1 ('MetaSel ('Just "channelID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake Channel)) :: S1 ('MetaSel ('Just "code") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Text)) :: (S1 ('MetaSel ('Just "createdAt") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 UTCTime) :: (S1 ('MetaSel ('Just "guildID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe (Snowflake Guild))) :: S1 ('MetaSel ('Just "inviter") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe (Snowflake User)))))) :: ((S1 ('MetaSel ('Just "maxAge") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Int) :: (S1 ('MetaSel ('Just "maxUses") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Int) :: S1 ('MetaSel ('Just "targetUser") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe (Snowflake User))))) :: (S1 ('MetaSel ('Just "targetUserType") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe Integer)) :: (S1 ('MetaSel ('Just "temporary") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Bool) :: S1 ('MetaSel ('Just "uses") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Integer))))))

data InviteDeleteData Source #

Constructors

InviteDeleteData
Fields channelID :: Snowflake Channel guildID :: Maybe (Snowflake Guild) code :: Text

Instances

Instances details

Show InviteDeleteData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> InviteDeleteData -> ShowS # show :: InviteDeleteData -> String # showList :: [InviteDeleteData] -> ShowS #
Generic InviteDeleteData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep InviteDeleteData :: Type -> Type # Methods from :: InviteDeleteData -> Rep InviteDeleteData x # to :: Rep InviteDeleteData x -> InviteDeleteData #
FromJSON InviteDeleteData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods parseJSON :: Value -> Parser InviteDeleteData # parseJSONList :: Value -> Parser [InviteDeleteData] #
type Rep InviteDeleteData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep InviteDeleteData = D1 ('MetaData "InviteDeleteData" "Calamity.Gateway.DispatchEvents" "calamity-0.3.0.0-inplace" 'False) (C1 ('MetaCons "InviteDeleteData" 'PrefixI 'True) (S1 ('MetaSel ('Just "channelID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake Channel)) :: (S1 ('MetaSel ('Just "guildID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe (Snowflake Guild))) :: S1 ('MetaSel ('Just "code") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Text))))

data MessageDeleteData Source #

Constructors

MessageDeleteData
Fields id :: Snowflake Message channelID :: Snowflake Channel guildID :: Snowflake Guild

Instances

Instances details

Show MessageDeleteData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> MessageDeleteData -> ShowS # show :: MessageDeleteData -> String # showList :: [MessageDeleteData] -> ShowS #
Generic MessageDeleteData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep MessageDeleteData :: Type -> Type # Methods from :: MessageDeleteData -> Rep MessageDeleteData x # to :: Rep MessageDeleteData x -> MessageDeleteData #
FromJSON MessageDeleteData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods parseJSON :: Value -> Parser MessageDeleteData # parseJSONList :: Value -> Parser [MessageDeleteData] #
type Rep MessageDeleteData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep MessageDeleteData = D1 ('MetaData "MessageDeleteData" "Calamity.Gateway.DispatchEvents" "calamity-0.3.0.0-inplace" 'False) (C1 ('MetaCons "MessageDeleteData" '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 (Snowflake Guild)))))

data MessageDeleteBulkData Source #

Constructors

MessageDeleteBulkData
Fields guildID :: Snowflake Guild channelID :: Snowflake Channel ids :: [Snowflake Message]

Instances

Instances details

Show MessageDeleteBulkData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> MessageDeleteBulkData -> ShowS # show :: MessageDeleteBulkData -> String # showList :: [MessageDeleteBulkData] -> ShowS #
Generic MessageDeleteBulkData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep MessageDeleteBulkData :: Type -> Type # Methods from :: MessageDeleteBulkData -> Rep MessageDeleteBulkData x # to :: Rep MessageDeleteBulkData x -> MessageDeleteBulkData #
FromJSON MessageDeleteBulkData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods parseJSON :: Value -> Parser MessageDeleteBulkData # parseJSONList :: Value -> Parser [MessageDeleteBulkData] #
type Rep MessageDeleteBulkData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep MessageDeleteBulkData = D1 ('MetaData "MessageDeleteBulkData" "Calamity.Gateway.DispatchEvents" "calamity-0.3.0.0-inplace" 'False) (C1 ('MetaCons "MessageDeleteBulkData" 'PrefixI 'True) (S1 ('MetaSel ('Just "guildID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake Guild)) :: (S1 ('MetaSel ('Just "channelID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake Channel)) :: S1 ('MetaSel ('Just "ids") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 [Snowflake Message]))))

data MessageReactionRemoveAllData Source #

Constructors

MessageReactionRemoveAllData
Fields channelID :: Snowflake Channel messageID :: Snowflake Message guildID :: Maybe (Snowflake Guild)

Instances

Instances details

Show MessageReactionRemoveAllData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> MessageReactionRemoveAllData -> ShowS # show :: MessageReactionRemoveAllData -> String # showList :: [MessageReactionRemoveAllData] -> ShowS #
Generic MessageReactionRemoveAllData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep MessageReactionRemoveAllData :: Type -> Type # Methods from :: MessageReactionRemoveAllData -> Rep MessageReactionRemoveAllData x # to :: Rep MessageReactionRemoveAllData x -> MessageReactionRemoveAllData #
FromJSON MessageReactionRemoveAllData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods parseJSON :: Value -> Parser MessageReactionRemoveAllData # parseJSONList :: Value -> Parser [MessageReactionRemoveAllData] #
type Rep MessageReactionRemoveAllData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep MessageReactionRemoveAllData = D1 ('MetaData "MessageReactionRemoveAllData" "Calamity.Gateway.DispatchEvents" "calamity-0.3.0.0-inplace" 'False) (C1 ('MetaCons "MessageReactionRemoveAllData" 'PrefixI 'True) (S1 ('MetaSel ('Just "channelID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake Channel)) :: (S1 ('MetaSel ('Just "messageID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake Message)) :: S1 ('MetaSel ('Just "guildID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe (Snowflake Guild))))))

data PresenceUpdateData Source #

Constructors

PresenceUpdateData
Fields userID :: Snowflake User presence :: Presence

Instances

Instances details

Show PresenceUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> PresenceUpdateData -> ShowS # show :: PresenceUpdateData -> String # showList :: [PresenceUpdateData] -> ShowS #
Generic PresenceUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep PresenceUpdateData :: Type -> Type # Methods from :: PresenceUpdateData -> Rep PresenceUpdateData x # to :: Rep PresenceUpdateData x -> PresenceUpdateData #
FromJSON PresenceUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods parseJSON :: Value -> Parser PresenceUpdateData # parseJSONList :: Value -> Parser [PresenceUpdateData] #
type Rep PresenceUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep PresenceUpdateData = D1 ('MetaData "PresenceUpdateData" "Calamity.Gateway.DispatchEvents" "calamity-0.3.0.0-inplace" 'False) (C1 ('MetaCons "PresenceUpdateData" 'PrefixI 'True) (S1 ('MetaSel ('Just "userID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake User)) :*: S1 ('MetaSel ('Just "presence") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 Presence)))

data TypingStartData Source #

Constructors

TypingStartData
Fields channelID :: Snowflake Channel guildID :: Maybe (Snowflake Guild) userID :: Snowflake User timestamp :: UnixTimestamp

Instances

Instances details

Show TypingStartData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> TypingStartData -> ShowS # show :: TypingStartData -> String # showList :: [TypingStartData] -> ShowS #
Generic TypingStartData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep TypingStartData :: Type -> Type # Methods from :: TypingStartData -> Rep TypingStartData x # to :: Rep TypingStartData x -> TypingStartData #
FromJSON TypingStartData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods parseJSON :: Value -> Parser TypingStartData # parseJSONList :: Value -> Parser [TypingStartData] #
type Rep TypingStartData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep TypingStartData = D1 ('MetaData "TypingStartData" "Calamity.Gateway.DispatchEvents" "calamity-0.3.0.0-inplace" 'False) (C1 ('MetaCons "TypingStartData" 'PrefixI 'True) ((S1 ('MetaSel ('Just "channelID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake Channel)) :: S1 ('MetaSel ('Just "guildID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe (Snowflake Guild)))) :: (S1 ('MetaSel ('Just "userID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake User)) :*: S1 ('MetaSel ('Just "timestamp") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 UnixTimestamp))))

newtype VoiceServerUpdateData Source #

Constructors

VoiceServerUpdateData Value

Instances

Instances details

Show VoiceServerUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> VoiceServerUpdateData -> ShowS # show :: VoiceServerUpdateData -> String # showList :: [VoiceServerUpdateData] -> ShowS #
Generic VoiceServerUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep VoiceServerUpdateData :: Type -> Type # Methods from :: VoiceServerUpdateData -> Rep VoiceServerUpdateData x # to :: Rep VoiceServerUpdateData x -> VoiceServerUpdateData #
ToJSON VoiceServerUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods toJSON :: VoiceServerUpdateData -> Value # toEncoding :: VoiceServerUpdateData -> Encoding # toJSONList :: [VoiceServerUpdateData] -> Value # toEncodingList :: [VoiceServerUpdateData] -> Encoding #
FromJSON VoiceServerUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods parseJSON :: Value -> Parser VoiceServerUpdateData # parseJSONList :: Value -> Parser [VoiceServerUpdateData] #
type Rep VoiceServerUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep VoiceServerUpdateData = Rep Value

newtype WebhooksUpdateData Source #

Constructors

WebhooksUpdateData Value

Instances

Instances details

Show WebhooksUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> WebhooksUpdateData -> ShowS # show :: WebhooksUpdateData -> String # showList :: [WebhooksUpdateData] -> ShowS #
Generic WebhooksUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep WebhooksUpdateData :: Type -> Type # Methods from :: WebhooksUpdateData -> Rep WebhooksUpdateData x # to :: Rep WebhooksUpdateData x -> WebhooksUpdateData #
ToJSON WebhooksUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods toJSON :: WebhooksUpdateData -> Value # toEncoding :: WebhooksUpdateData -> Encoding # toJSONList :: [WebhooksUpdateData] -> Value # toEncodingList :: [WebhooksUpdateData] -> Encoding #
FromJSON WebhooksUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods parseJSON :: Value -> Parser WebhooksUpdateData # parseJSONList :: Value -> Parser [WebhooksUpdateData] #
type Rep WebhooksUpdateData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep WebhooksUpdateData = Rep Value

data ReactionEvtData Source #

Constructors

ReactionEvtData
Fields userID :: Snowflake User channelID :: Snowflake Channel messageID :: Snowflake Message guildID :: Maybe (Snowflake Guild) emoji :: RawEmoji

Instances

Instances details

Eq ReactionEvtData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods (==) :: ReactionEvtData -> ReactionEvtData -> Bool # (/=) :: ReactionEvtData -> ReactionEvtData -> Bool #
Show ReactionEvtData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods showsPrec :: Int -> ReactionEvtData -> ShowS # show :: ReactionEvtData -> String # showList :: [ReactionEvtData] -> ShowS #
Generic ReactionEvtData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Associated Types type Rep ReactionEvtData :: Type -> Type # Methods from :: ReactionEvtData -> Rep ReactionEvtData x # to :: Rep ReactionEvtData x -> ReactionEvtData #
ToJSON ReactionEvtData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods toJSON :: ReactionEvtData -> Value # toEncoding :: ReactionEvtData -> Encoding # toJSONList :: [ReactionEvtData] -> Value # toEncodingList :: [ReactionEvtData] -> Encoding #
FromJSON ReactionEvtData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods parseJSON :: Value -> Parser ReactionEvtData # parseJSONList :: Value -> Parser [ReactionEvtData] #
HasID Channel ReactionEvtData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods getID :: ReactionEvtData -> Snowflake Channel Source #
HasID Message ReactionEvtData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods getID :: ReactionEvtData -> Snowflake Message Source #
HasID User ReactionEvtData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents Methods getID :: ReactionEvtData -> Snowflake User Source #
type Rep ReactionEvtData Source #
Instance details Defined in Calamity.Gateway.DispatchEvents type Rep ReactionEvtData = D1 ('MetaData "ReactionEvtData" "Calamity.Gateway.DispatchEvents" "calamity-0.3.0.0-inplace" 'False) (C1 ('MetaCons "ReactionEvtData" 'PrefixI 'True) ((S1 ('MetaSel ('Just "userID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake User)) :: S1 ('MetaSel ('Just "channelID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake Channel))) :: (S1 ('MetaSel ('Just "messageID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Snowflake Message)) :: (S1 ('MetaSel ('Just "guildID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 (Maybe (Snowflake Guild))) :: S1 ('MetaSel ('Just "emoji") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 RawEmoji)))))