digestive-functors-aeson 1.0.0 → 1.0.1
raw patch · 2 files changed
+4/−3 lines, 2 filesdep +safePVP ok
version bump matches the API change (PVP)
Dependencies added: safe
API changes (from Hackage documentation)
Files
digestive-functors-aeson.cabal view
@@ -1,6 +1,6 @@ name: digestive-functors-aeson category: Web, JSON-version: 1.0.0+version: 1.0.1 license: GPL-3 license-file: LICENSE author: Oliver Charles@@ -29,6 +29,7 @@ base >= 4.5 && < 4.7, digestive-functors >= 0.5, lens >= 3.0,+ safe >= 0.3.3, text >= 0.11 hs-source-dirs: src ghc-options: -Wall -fwarn-tabs -funbox-strict-fields -O2
src/Text/Digestive/Aeson.hs view
@@ -7,8 +7,8 @@ import Control.Lens import Data.Aeson (Value(..)) import Data.Aeson.Lens+import Safe import Text.Digestive-import Text.Read (readMaybe) import qualified Data.Text as T @@ -40,7 +40,7 @@ Just v ^. pathToLens (filter (not . T.null) p) pathToLens = foldl (.) id . map pathElem- pathElem p = maybe (key p) nth (readMaybe $ T.unpack p)+ pathElem p = maybe (key p) nth (readMay $ T.unpack p) jsonToText (String s) = [TextInput s] jsonToText (Bool b) = showPack b