preamble 0.0.15 → 0.0.16

raw patch · 2 files changed

+8/−1 lines, 2 files

Files

preamble.cabal +1/−1
src/Preamble/Aeson.hs +7/−0

preamble.cabal view

@@ -1,5 +1,5 @@ name:                  preamble-version:               0.0.15+version:               0.0.16 synopsis:              Yet another prelude. description:           A prelude built on basic-prelude. homepage:              https://github.com/swift-nav/preamble

src/Preamble/Aeson.hs view

@@ -6,6 +6,7 @@   ( camelOptions   , snakeOptions   , spinalOptions+  , maybeResult   , eitherResult   ) where @@ -46,6 +47,12 @@   , constructorTagModifier = unpack . toSpinal . unprefix . lowerHead . pack   , omitNothingFields      = True   }++-- | Convert Aeson Result into a Maybe.+--+maybeResult :: Result a -> Maybe a+maybeResult (Error _s) = Nothing+maybeResult (Success a) = Just a  -- | Convert Aeson Result into an Either. --