packages feed

hedgehog-extras 0.4.7.1 → 0.4.8.0

raw patch · 2 files changed

+5/−11 lines, 2 filesdep −unordered-containersdep ~basePVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependencies removed: unordered-containers

Dependency ranges changed: base

API changes (from Hackage documentation)

- Hedgehog.Extras.Stock.Aeson: rewriteObject :: (HashMap Text Value -> HashMap Text Value) -> Value -> Value
+ Hedgehog.Extras.Stock.Aeson: rewriteObject :: (KeyMap Value -> KeyMap Value) -> Value -> Value

Files

hedgehog-extras.cabal view
@@ -1,7 +1,7 @@ cabal-version: 2.4  name:                   hedgehog-extras-version:                0.4.7.1+version:                0.4.8.0 synopsis:               Supplemental library for hedgehog description:            Supplemental library for hedgehog. category:               Test@@ -19,7 +19,7 @@ common aeson                        { build-depends: aeson                            >= 2.1.0.0                  } common aeson-pretty                 { build-depends: aeson-pretty                     >= 0.8.5                    } common async                        { build-depends: async                                                        }-common base                         { build-depends: base                             >= 4.12       && < 4.19     }+common base                         { build-depends: base                             >= 4.12       && < 4.20     } common bytestring                   { build-depends: bytestring                                                   } common deepseq                      { build-depends: deepseq                                                      } common Diff                         { build-depends: Diff                                                         }@@ -40,7 +40,6 @@ common time                         { build-depends: time                             >= 1.9.1                    } common transformers                 { build-depends: transformers                                                 } common unliftio                     { build-depends: unliftio                                                     }-common unordered-containers         { build-depends: unordered-containers                                         } common yaml                         { build-depends: yaml                                                         } common zlib                         { build-depends: zlib                                                         } @@ -84,7 +83,6 @@                         time,                         transformers,                         unliftio,-                        unordered-containers,                         Win32,                         yaml,                         zlib,
src/Hedgehog/Extras/Stock/Aeson.hs view
@@ -4,18 +4,14 @@   ) where  import           Data.Aeson+import           Data.Aeson.KeyMap (KeyMap) import           Data.Functor-import           Data.HashMap.Lazy-import           Data.Text-import           Prelude (($), (.)) -import qualified Data.Aeson.KeyMap as KM- -- | Rewrite a JSON object to another JSON object using the function 'f'. -- -- All other JSON values are preserved.-rewriteObject :: (HashMap Text Value -> HashMap Text Value) -> Value -> Value-rewriteObject f (Object hm) = Object (KM.fromHashMapText . f . KM.toHashMapText $ hm)+rewriteObject :: (KeyMap Value -> KeyMap Value) -> Value -> Value+rewriteObject f (Object hm) = Object (f hm) rewriteObject _ v = v  -- | Rewrite each element of a JSON array using the function 'f'.