packages feed

calamity 0.1.3.1 → 0.1.4.0

raw patch · 6 files changed

+14/−3 lines, 6 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

- Calamity.Types.Model.Guild: ($sel:afkChannelID:UpdatedGuild) :: UpdatedGuild -> Maybe (Snowflake GuildChannel)
- Calamity.Types.Model.Guild: ($sel:afkTimeout:UpdatedGuild) :: UpdatedGuild -> Int
- Calamity.Types.Model.Guild: ($sel:applicationID:UpdatedGuild) :: UpdatedGuild -> Maybe (Snowflake User)
- Calamity.Types.Model.Guild: ($sel:defaultMessageNotifications:UpdatedGuild) :: UpdatedGuild -> Int
- Calamity.Types.Model.Guild: ($sel:embedChannelID:UpdatedGuild) :: UpdatedGuild -> Maybe (Snowflake GuildChannel)
- Calamity.Types.Model.Guild: ($sel:embedEnabled:UpdatedGuild) :: UpdatedGuild -> Maybe Bool
- Calamity.Types.Model.Guild: ($sel:emojis:UpdatedGuild) :: UpdatedGuild -> SnowflakeMap Emoji
- Calamity.Types.Model.Guild: ($sel:explicitContentFilter:UpdatedGuild) :: UpdatedGuild -> Int
- Calamity.Types.Model.Guild: ($sel:features:UpdatedGuild) :: UpdatedGuild -> [Text]
- Calamity.Types.Model.Guild: ($sel:icon:UpdatedGuild) :: UpdatedGuild -> Maybe Text
- Calamity.Types.Model.Guild: ($sel:id:UpdatedGuild) :: UpdatedGuild -> Snowflake Guild
- Calamity.Types.Model.Guild: ($sel:mfaLevel:UpdatedGuild) :: UpdatedGuild -> Int
- Calamity.Types.Model.Guild: ($sel:name:UpdatedGuild) :: UpdatedGuild -> Text
- Calamity.Types.Model.Guild: ($sel:owner:UpdatedGuild) :: UpdatedGuild -> Maybe Bool
- Calamity.Types.Model.Guild: ($sel:ownerID:UpdatedGuild) :: UpdatedGuild -> Snowflake User
- Calamity.Types.Model.Guild: ($sel:permissions:UpdatedGuild) :: UpdatedGuild -> Maybe Word64
- Calamity.Types.Model.Guild: ($sel:region:UpdatedGuild) :: UpdatedGuild -> Text
- Calamity.Types.Model.Guild: ($sel:roles:UpdatedGuild) :: UpdatedGuild -> SnowflakeMap Role
- Calamity.Types.Model.Guild: ($sel:splash:UpdatedGuild) :: UpdatedGuild -> Maybe Text
- Calamity.Types.Model.Guild: ($sel:systemChannelID:UpdatedGuild) :: UpdatedGuild -> Maybe (Snowflake GuildChannel)
- Calamity.Types.Model.Guild: ($sel:verificationLevel:UpdatedGuild) :: UpdatedGuild -> Int
- Calamity.Types.Model.Guild: ($sel:widgetChannelID:UpdatedGuild) :: UpdatedGuild -> Maybe (Snowflake GuildChannel)
- Calamity.Types.Model.Guild: ($sel:widgetEnabled:UpdatedGuild) :: UpdatedGuild -> Maybe Bool
+ Calamity.Types.Model.Channel: data family Partial t
+ Calamity.Types.Model.Guild: data family Partial t
+ Calamity.Types.Model.Guild.Emoji: data family Partial t
+ Calamity.Types.Model.Guild.Guild: data family Partial t
- Calamity.Cache.Eff: delDM :: forall r_a8KJ8. MemberWithError CacheEff r_a8KJ8 => Snowflake DMChannel -> Sem r_a8KJ8 ()
+ Calamity.Cache.Eff: delDM :: forall r_a8FR7. MemberWithError CacheEff r_a8FR7 => Snowflake DMChannel -> Sem r_a8FR7 ()
- Calamity.Cache.Eff: delGuild :: forall r_a8KJ2. MemberWithError CacheEff r_a8KJ2 => Snowflake Guild -> Sem r_a8KJ2 ()
+ Calamity.Cache.Eff: delGuild :: forall r_a8FR1. MemberWithError CacheEff r_a8FR1 => Snowflake Guild -> Sem r_a8FR1 ()
- Calamity.Cache.Eff: delMessage :: forall r_a8KJq. MemberWithError CacheEff r_a8KJq => Snowflake Message -> Sem r_a8KJq ()
+ Calamity.Cache.Eff: delMessage :: forall r_a8FRp. MemberWithError CacheEff r_a8FRp => Snowflake Message -> Sem r_a8FRp ()
- Calamity.Cache.Eff: delUnavailableGuild :: forall r_a8KJk. MemberWithError CacheEff r_a8KJk => Snowflake Guild -> Sem r_a8KJk ()
+ Calamity.Cache.Eff: delUnavailableGuild :: forall r_a8FRj. MemberWithError CacheEff r_a8FRj => Snowflake Guild -> Sem r_a8FRj ()
- Calamity.Cache.Eff: delUser :: forall r_a8KJe. MemberWithError CacheEff r_a8KJe => Snowflake User -> Sem r_a8KJe ()
+ Calamity.Cache.Eff: delUser :: forall r_a8FRd. MemberWithError CacheEff r_a8FRd => Snowflake User -> Sem r_a8FRd ()
- Calamity.Cache.Eff: getBotUser :: forall r_a8KIX. MemberWithError CacheEff r_a8KIX => Sem r_a8KIX (Maybe User)
+ Calamity.Cache.Eff: getBotUser :: forall r_a8FQW. MemberWithError CacheEff r_a8FQW => Sem r_a8FQW (Maybe User)
- Calamity.Cache.Eff: getDM :: forall r_a8KJ6. MemberWithError CacheEff r_a8KJ6 => Snowflake DMChannel -> Sem r_a8KJ6 (Maybe DMChannel)
+ Calamity.Cache.Eff: getDM :: forall r_a8FR5. MemberWithError CacheEff r_a8FR5 => Snowflake DMChannel -> Sem r_a8FR5 (Maybe DMChannel)
- Calamity.Cache.Eff: getGuild :: forall r_a8KJ0. MemberWithError CacheEff r_a8KJ0 => Snowflake Guild -> Sem r_a8KJ0 (Maybe Guild)
+ Calamity.Cache.Eff: getGuild :: forall r_a8FQZ. MemberWithError CacheEff r_a8FQZ => Snowflake Guild -> Sem r_a8FQZ (Maybe Guild)
- Calamity.Cache.Eff: getMessage :: forall r_a8KJo. MemberWithError CacheEff r_a8KJo => Snowflake Message -> Sem r_a8KJo (Maybe Message)
+ Calamity.Cache.Eff: getMessage :: forall r_a8FRn. MemberWithError CacheEff r_a8FRn => Snowflake Message -> Sem r_a8FRn (Maybe Message)
- Calamity.Cache.Eff: getUser :: forall r_a8KJc. MemberWithError CacheEff r_a8KJc => Snowflake User -> Sem r_a8KJc (Maybe User)
+ Calamity.Cache.Eff: getUser :: forall r_a8FRb. MemberWithError CacheEff r_a8FRb => Snowflake User -> Sem r_a8FRb (Maybe User)
- Calamity.Cache.Eff: isUnavailableGuild :: forall r_a8KJi. MemberWithError CacheEff r_a8KJi => Snowflake Guild -> Sem r_a8KJi Bool
+ Calamity.Cache.Eff: isUnavailableGuild :: forall r_a8FRh. MemberWithError CacheEff r_a8FRh => Snowflake Guild -> Sem r_a8FRh Bool
- Calamity.Cache.Eff: setBotUser :: forall r_a8KIV. MemberWithError CacheEff r_a8KIV => User -> Sem r_a8KIV ()
+ Calamity.Cache.Eff: setBotUser :: forall r_a8FQU. MemberWithError CacheEff r_a8FQU => User -> Sem r_a8FQU ()
- Calamity.Cache.Eff: setDM :: forall r_a8KJ4. MemberWithError CacheEff r_a8KJ4 => DMChannel -> Sem r_a8KJ4 ()
+ Calamity.Cache.Eff: setDM :: forall r_a8FR3. MemberWithError CacheEff r_a8FR3 => DMChannel -> Sem r_a8FR3 ()
- Calamity.Cache.Eff: setGuild :: forall r_a8KIY. MemberWithError CacheEff r_a8KIY => Guild -> Sem r_a8KIY ()
+ Calamity.Cache.Eff: setGuild :: forall r_a8FQX. MemberWithError CacheEff r_a8FQX => Guild -> Sem r_a8FQX ()
- Calamity.Cache.Eff: setMessage :: forall r_a8KJm. MemberWithError CacheEff r_a8KJm => Message -> Sem r_a8KJm ()
+ Calamity.Cache.Eff: setMessage :: forall r_a8FRl. MemberWithError CacheEff r_a8FRl => Message -> Sem r_a8FRl ()
- Calamity.Cache.Eff: setUnavailableGuild :: forall r_a8KJg. MemberWithError CacheEff r_a8KJg => Snowflake Guild -> Sem r_a8KJg ()
+ Calamity.Cache.Eff: setUnavailableGuild :: forall r_a8FRf. MemberWithError CacheEff r_a8FRf => Snowflake Guild -> Sem r_a8FRf ()
- Calamity.Cache.Eff: setUser :: forall r_a8KJa. MemberWithError CacheEff r_a8KJa => User -> Sem r_a8KJa ()
+ Calamity.Cache.Eff: setUser :: forall r_a8FR9. MemberWithError CacheEff r_a8FR9 => User -> Sem r_a8FR9 ()
- Calamity.Metrics.Eff: addCounter :: forall r_aJtz. MemberWithError MetricEff r_aJtz => Int -> Counter -> Sem r_aJtz Int
+ Calamity.Metrics.Eff: addCounter :: forall r_aEar. MemberWithError MetricEff r_aEar => Int -> Counter -> Sem r_aEar Int
- Calamity.Metrics.Eff: modifyGauge :: forall r_aJtC. MemberWithError MetricEff r_aJtC => (Double -> Double) -> Gauge -> Sem r_aJtC Double
+ Calamity.Metrics.Eff: modifyGauge :: forall r_aEau. MemberWithError MetricEff r_aEau => (Double -> Double) -> Gauge -> Sem r_aEau Double
- Calamity.Metrics.Eff: observeHistogram :: forall r_aJtF. MemberWithError MetricEff r_aJtF => Double -> Histogram -> Sem r_aJtF HistogramSample
+ Calamity.Metrics.Eff: observeHistogram :: forall r_aEax. MemberWithError MetricEff r_aEax => Double -> Histogram -> Sem r_aEax HistogramSample
- Calamity.Metrics.Eff: registerCounter :: forall r_aJtp. MemberWithError MetricEff r_aJtp => Text -> [(Text, Text)] -> Sem r_aJtp Counter
+ Calamity.Metrics.Eff: registerCounter :: forall r_aEah. MemberWithError MetricEff r_aEah => Text -> [(Text, Text)] -> Sem r_aEah Counter
- Calamity.Metrics.Eff: registerGauge :: forall r_aJts. MemberWithError MetricEff r_aJts => Text -> [(Text, Text)] -> Sem r_aJts Gauge
+ Calamity.Metrics.Eff: registerGauge :: forall r_aEak. MemberWithError MetricEff r_aEak => Text -> [(Text, Text)] -> Sem r_aEak Gauge
- Calamity.Metrics.Eff: registerHistogram :: forall r_aJtv. MemberWithError MetricEff r_aJtv => Text -> [(Text, Text)] -> [Double] -> Sem r_aJtv Histogram
+ Calamity.Metrics.Eff: registerHistogram :: forall r_aEan. MemberWithError MetricEff r_aEan => Text -> [(Text, Text)] -> [Double] -> Sem r_aEan Histogram

Files

ChangeLog.md view
@@ -1,5 +1,13 @@ # Changelog for Calamity +## 0.1.4.0++* Added back extra exports of `Calamity.Types.Partial` from+  `Calamity.Types.Model.Guild.Guild`, `Calamity.Type.Model.Guild.Emoji`, and+  `Calamity.Types.Model.Channel`. There is now way to export the constructor+  without also exporting Partial apparently?++ ## 0.1.3.0  *2020-04-27*
calamity.cabal view
@@ -4,10 +4,10 @@ -- -- see: https://github.com/sol/hpack ----- hash: 695c7d41899171d5dfbf383bbb6c330d9563c53630c5cabcd84718734a98a338+-- hash: 42032cd759481bc362a687c9f261f05fb54e2982b44be513fe52d1030db46b44  name:           calamity-version:        0.1.3.1+version:        0.1.4.0 synopsis:       A library for writing discord bots description:    Please see the README on GitHub at <https://github.com/nitros12/calamity#readme> category:       Network, Web
src/Calamity/Types/Model/Channel.hs view
@@ -1,6 +1,7 @@ -- | The generic channel type module Calamity.Types.Model.Channel     ( Channel(..)+    , Partial(PartialChannel)     , module Calamity.Types.Model.Channel.DM     , module Calamity.Types.Model.Channel.Group     , module Calamity.Types.Model.Channel.Guild
src/Calamity/Types/Model/Guild.hs view
@@ -9,7 +9,7 @@     , module Calamity.Types.Model.Guild.UnavailableGuild ) where  import           Calamity.Types.Model.Guild.Emoji-import           Calamity.Types.Model.Guild.Guild            hiding ( UpdatedGuild )+import           Calamity.Types.Model.Guild.Guild            hiding ( UpdatedGuild(..) ) import           Calamity.Types.Model.Guild.Invite import           Calamity.Types.Model.Guild.Member import           Calamity.Types.Model.Guild.Overwrite
src/Calamity/Types/Model/Guild/Emoji.hs view
@@ -1,6 +1,7 @@ -- | Discord emojis module Calamity.Types.Model.Guild.Emoji     ( Emoji(..)+    , Partial(PartialEmoji)     , RawEmoji(..) ) where  import           Calamity.Internal.AesonThings
src/Calamity/Types/Model/Guild/Guild.hs view
@@ -1,6 +1,7 @@ -- | Discord Guilds module Calamity.Types.Model.Guild.Guild     ( Guild(..)+    , Partial(PartialGuild)     , UpdatedGuild(..) ) where  import           Calamity.Internal.AesonThings