calamity 0.12.0.0 → 0.12.1.0
raw patch · 4 files changed
+23/−6 lines, 4 filesdep ~crypton-connection
Dependency ranges changed: crypton-connection
Files
- Calamity/Internal/Utils.hs +1/−1
- Calamity/Types/Model/Channel/ChannelType.hs +13/−2
- ChangeLog.md +6/−0
- calamity.cabal +3/−3
Calamity/Internal/Utils.hs view
@@ -184,7 +184,7 @@ k .= v = Just (k Aeson..= v) class CalamityToJSON' a where- toPairs :: Aeson.KeyValue kv => a -> [Maybe kv]+ toPairs :: Aeson.KeyValue v kv => a -> [Maybe kv] #else (.?=) :: (Aeson.ToJSON v, Aeson.KeyValue kv) => Aeson.Key -> Maybe v -> Maybe kv k .?= Just v = Just (k Aeson..= v)
Calamity/Types/Model/Channel/ChannelType.hs view
@@ -28,8 +28,19 @@ $(makeFieldLabelsNoPrefix ''ChannelType) instance Aeson.ToJSON ChannelType where- toJSON t = Aeson.toJSON (fromEnum t)- toEncoding t = Aeson.toEncoding (fromEnum t)+ toJSON t = Aeson.Number $ case t of+ GuildTextType -> 0+ DMType -> 1+ GuildVoiceType -> 2+ GroupDMType -> 3+ GuildCategoryType -> 4+ GuildNewsType -> 5+ GuildNewsThreadType -> 10+ GuildPublicThreadType -> 11+ GuildPrivateThreadType -> 12+ GuildStageVoiceType -> 13+ GuildDirectoryType -> 14+ GuildForumType -> 15 instance Aeson.FromJSON ChannelType where parseJSON = Aeson.withScientific "ChannelType" $ \n -> case toBoundedInteger @Int n of
ChangeLog.md view
@@ -1,5 +1,11 @@ # Changelog for Calamity +## 0.12.1.0+++ Fixed build with Aeson 2.2+ @L0neGamer++ Fix ToJSON ChannelType instances @MorrowM++ Bumped crypton-connection bounds from <0.4 to <0.5+ ## 0.12.0.0 + Field names in `Calamity.HTTP.Webhook` were mistakenly `username` instead of
calamity.cabal view
@@ -1,6 +1,6 @@ cabal-version: 2.0 name: calamity-version: 0.12.0.0+version: 0.12.1.0 synopsis: A library for writing discord bots in haskell description: Please see the README on GitHub at <https://github.com/simmsb/calamity#readme>@@ -14,7 +14,7 @@ license: MIT license-file: LICENSE build-type: Simple-tested-with: GHC ==9.6.5+tested-with: GHC ==9.6.6 extra-source-files: ChangeLog.md README.md@@ -193,7 +193,7 @@ , colour >=2.3.5 && <2.4 , concurrent-extra >=0.7 && <0.8 , containers >=0.6 && <0.8- , crypton-connection >=0.2.6 && <0.4+ , crypton-connection >=0.2.6 && <0.5 , crypton-x509-system >=1.6.6 && <1.7 , data-default-class >=0.1 && <0.2 , data-flags >=0.0.3 && <0.1