calamity 0.1.19.0 → 0.1.19.1
raw patch · 3 files changed
+9/−3 lines, 3 filesPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
API changes (from Hackage documentation)
+ Calamity.Types.Model.Presence.Activity: Other :: Int -> ActivityType
- Calamity.Cache.Eff: delDM :: forall r_a9z5v. MemberWithError CacheEff r_a9z5v => Snowflake DMChannel -> Sem r_a9z5v ()
+ Calamity.Cache.Eff: delDM :: forall r_a9zV1. MemberWithError CacheEff r_a9zV1 => Snowflake DMChannel -> Sem r_a9zV1 ()
- Calamity.Cache.Eff: delGuild :: forall r_a9z5o. MemberWithError CacheEff r_a9z5o => Snowflake Guild -> Sem r_a9z5o ()
+ Calamity.Cache.Eff: delGuild :: forall r_a9zUU. MemberWithError CacheEff r_a9zUU => Snowflake Guild -> Sem r_a9zUU ()
- Calamity.Cache.Eff: delMessage :: forall r_a9z5Q. MemberWithError CacheEff r_a9z5Q => Snowflake Message -> Sem r_a9z5Q ()
+ Calamity.Cache.Eff: delMessage :: forall r_a9zVm. MemberWithError CacheEff r_a9zVm => Snowflake Message -> Sem r_a9zVm ()
- Calamity.Cache.Eff: delUnavailableGuild :: forall r_a9z5J. MemberWithError CacheEff r_a9z5J => Snowflake Guild -> Sem r_a9z5J ()
+ Calamity.Cache.Eff: delUnavailableGuild :: forall r_a9zVf. MemberWithError CacheEff r_a9zVf => Snowflake Guild -> Sem r_a9zVf ()
- Calamity.Cache.Eff: delUser :: forall r_a9z5C. MemberWithError CacheEff r_a9z5C => Snowflake User -> Sem r_a9z5C ()
+ Calamity.Cache.Eff: delUser :: forall r_a9zV8. MemberWithError CacheEff r_a9zV8 => Snowflake User -> Sem r_a9zV8 ()
- Calamity.Cache.Eff: getBotUser :: forall r_a9z5g. MemberWithError CacheEff r_a9z5g => Sem r_a9z5g (Maybe User)
+ Calamity.Cache.Eff: getBotUser :: forall r_a9zUM. MemberWithError CacheEff r_a9zUM => Sem r_a9zUM (Maybe User)
- Calamity.Cache.Eff: getDM :: forall r_a9z5s. MemberWithError CacheEff r_a9z5s => Snowflake DMChannel -> Sem r_a9z5s (Maybe DMChannel)
+ Calamity.Cache.Eff: getDM :: forall r_a9zUY. MemberWithError CacheEff r_a9zUY => Snowflake DMChannel -> Sem r_a9zUY (Maybe DMChannel)
- Calamity.Cache.Eff: getDMs :: forall r_a9z5u. MemberWithError CacheEff r_a9z5u => Sem r_a9z5u [DMChannel]
+ Calamity.Cache.Eff: getDMs :: forall r_a9zV0. MemberWithError CacheEff r_a9zV0 => Sem r_a9zV0 [DMChannel]
- Calamity.Cache.Eff: getGuild :: forall r_a9z5j. MemberWithError CacheEff r_a9z5j => Snowflake Guild -> Sem r_a9z5j (Maybe Guild)
+ Calamity.Cache.Eff: getGuild :: forall r_a9zUP. MemberWithError CacheEff r_a9zUP => Snowflake Guild -> Sem r_a9zUP (Maybe Guild)
- Calamity.Cache.Eff: getGuildChannel :: forall r_a9z5l. MemberWithError CacheEff r_a9z5l => Snowflake GuildChannel -> Sem r_a9z5l (Maybe GuildChannel)
+ Calamity.Cache.Eff: getGuildChannel :: forall r_a9zUR. MemberWithError CacheEff r_a9zUR => Snowflake GuildChannel -> Sem r_a9zUR (Maybe GuildChannel)
- Calamity.Cache.Eff: getGuilds :: forall r_a9z5n. MemberWithError CacheEff r_a9z5n => Sem r_a9z5n [Guild]
+ Calamity.Cache.Eff: getGuilds :: forall r_a9zUT. MemberWithError CacheEff r_a9zUT => Sem r_a9zUT [Guild]
- Calamity.Cache.Eff: getMessage :: forall r_a9z5N. MemberWithError CacheEff r_a9z5N => Snowflake Message -> Sem r_a9z5N (Maybe Message)
+ Calamity.Cache.Eff: getMessage :: forall r_a9zVj. MemberWithError CacheEff r_a9zVj => Snowflake Message -> Sem r_a9zVj (Maybe Message)
- Calamity.Cache.Eff: getMessages :: forall r_a9z5P. MemberWithError CacheEff r_a9z5P => Sem r_a9z5P [Message]
+ Calamity.Cache.Eff: getMessages :: forall r_a9zVl. MemberWithError CacheEff r_a9zVl => Sem r_a9zVl [Message]
- Calamity.Cache.Eff: getUnavailableGuilds :: forall r_a9z5I. MemberWithError CacheEff r_a9z5I => Sem r_a9z5I [Snowflake Guild]
+ Calamity.Cache.Eff: getUnavailableGuilds :: forall r_a9zVe. MemberWithError CacheEff r_a9zVe => Sem r_a9zVe [Snowflake Guild]
- Calamity.Cache.Eff: getUser :: forall r_a9z5z. MemberWithError CacheEff r_a9z5z => Snowflake User -> Sem r_a9z5z (Maybe User)
+ Calamity.Cache.Eff: getUser :: forall r_a9zV5. MemberWithError CacheEff r_a9zV5 => Snowflake User -> Sem r_a9zV5 (Maybe User)
- Calamity.Cache.Eff: getUsers :: forall r_a9z5B. MemberWithError CacheEff r_a9z5B => Sem r_a9z5B [User]
+ Calamity.Cache.Eff: getUsers :: forall r_a9zV7. MemberWithError CacheEff r_a9zV7 => Sem r_a9zV7 [User]
- Calamity.Cache.Eff: isUnavailableGuild :: forall r_a9z5G. MemberWithError CacheEff r_a9z5G => Snowflake Guild -> Sem r_a9z5G Bool
+ Calamity.Cache.Eff: isUnavailableGuild :: forall r_a9zVc. MemberWithError CacheEff r_a9zVc => Snowflake Guild -> Sem r_a9zVc Bool
- Calamity.Cache.Eff: setBotUser :: forall r_a9z5e. MemberWithError CacheEff r_a9z5e => User -> Sem r_a9z5e ()
+ Calamity.Cache.Eff: setBotUser :: forall r_a9zUK. MemberWithError CacheEff r_a9zUK => User -> Sem r_a9zUK ()
- Calamity.Cache.Eff: setDM :: forall r_a9z5q. MemberWithError CacheEff r_a9z5q => DMChannel -> Sem r_a9z5q ()
+ Calamity.Cache.Eff: setDM :: forall r_a9zUW. MemberWithError CacheEff r_a9zUW => DMChannel -> Sem r_a9zUW ()
- Calamity.Cache.Eff: setGuild :: forall r_a9z5h. MemberWithError CacheEff r_a9z5h => Guild -> Sem r_a9z5h ()
+ Calamity.Cache.Eff: setGuild :: forall r_a9zUN. MemberWithError CacheEff r_a9zUN => Guild -> Sem r_a9zUN ()
- Calamity.Cache.Eff: setMessage :: forall r_a9z5L. MemberWithError CacheEff r_a9z5L => Message -> Sem r_a9z5L ()
+ Calamity.Cache.Eff: setMessage :: forall r_a9zVh. MemberWithError CacheEff r_a9zVh => Message -> Sem r_a9zVh ()
- Calamity.Cache.Eff: setUnavailableGuild :: forall r_a9z5E. MemberWithError CacheEff r_a9z5E => Snowflake Guild -> Sem r_a9z5E ()
+ Calamity.Cache.Eff: setUnavailableGuild :: forall r_a9zVa. MemberWithError CacheEff r_a9zVa => Snowflake Guild -> Sem r_a9zVa ()
- Calamity.Cache.Eff: setUser :: forall r_a9z5x. MemberWithError CacheEff r_a9z5x => User -> Sem r_a9z5x ()
+ Calamity.Cache.Eff: setUser :: forall r_a9zV3. MemberWithError CacheEff r_a9zV3 => User -> Sem r_a9zV3 ()
Files
- ChangeLog.md +4/−0
- calamity.cabal +2/−2
- src/Calamity/Types/Model/Presence/Activity.hs +3/−1
ChangeLog.md view
@@ -1,5 +1,9 @@ # Changelog for Calamity +## 0.1.19.1++* Fixed another missing activity type+ ## 0.1.19.0 * Support hidden commands.
calamity.cabal view
@@ -4,10 +4,10 @@ -- -- see: https://github.com/sol/hpack ----- hash: b7f7d022985218eb24907d49707d0f464e86155b7bf0f0f0b714e5052d475dcd+-- hash: 3e1856812f1894e8627674660a1357adcdc7189d2964b0ed7f9b55c7087a4c68 name: calamity-version: 0.1.19.0+version: 0.1.19.1 synopsis: A library for writing discord bots in haskell description: Please see the README on GitHub at <https://github.com/nitros12/calamity#readme> category: Network, Web
src/Calamity/Types/Model/Presence/Activity.hs view
@@ -28,6 +28,7 @@ | Streaming | Listening | Custom+ | Other Int deriving ( Eq, Generic, Show ) deriving ( TextShow ) via TSG.FromGeneric ActivityType @@ -35,6 +36,7 @@ toJSON Game = Number 0 toJSON Streaming = Number 1 toJSON Listening = Number 2+ toJSON (Other n) = Number $ fromIntegral n toJSON Custom = Number 4 instance FromJSON ActivityType where@@ -44,7 +46,7 @@ 1 -> pure Streaming 2 -> pure Listening 4 -> pure Custom- _ -> fail $ "Invalid ActivityType: " <> show n+ n -> pure $ Other n Nothing -> fail $ "Invalid ActivityType: " <> show n data Activity = Activity