hw-polysemy 0.3.1.1 → 0.3.1.2

raw patch · 3 files changed

+4/−61 lines, 3 filesdep ~hw-preludePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: hw-prelude

API changes (from Hackage documentation)

Files

• core/HaskellWorks/Polysemy/Error/Types/JsonDecodeError.hs +1/−39
• core/HaskellWorks/Polysemy/Error/Types/YamlDecodeError.hs +1/−20
• hw-polysemy.cabal +2/−2

@@ -1,45 +1,7 @@-{-# LANGUAGE DataKinds             #-}-{-# LANGUAGE DeriveGeneric         #-}-{-# LANGUAGE DuplicateRecordFields #-}-{-# LANGUAGE NoFieldSelectors      #-}-{-# LANGUAGE OverloadedRecordDot   #-}- module HaskellWorks.Polysemy.Error.Types.JsonDecodeError   ( JsonDecodeError(..)   , newJsonDecodeError   ) where  -import           Data.Aeson           (ToJSON (..), Value, (.=))-import qualified Data.Aeson           as J-import           GHC.Generics--import           HaskellWorks.Prelude-import           HaskellWorks.ToText--data JsonDecodeError =-  JsonDecodeError-  { message    :: Text-  , bytestring :: Maybe ByteString-  , text       :: Maybe Text-  , json       :: Maybe Value-  }-  deriving (Eq, Generic, Show)--newJsonDecodeError :: ToText a => a -> JsonDecodeError-newJsonDecodeError message =-  JsonDecodeError-    { message    = toText message-    , bytestring = Nothing-    , text       = Nothing-    , json       = Nothing-    }--instance ToJSON JsonDecodeError where-  toJSON e =-    J.object-        [ "error" .= id @Text "JsonDecodeError"-        , "message" .= e.message-        , "text" .= e.text-        , "json" .= e.json-        ]+import           HaskellWorks.Error.Types.JsonDecodeError

@@ -1,25 +1,6 @@-{-# LANGUAGE DataKinds             #-}-{-# LANGUAGE DeriveGeneric         #-}-{-# LANGUAGE DuplicateRecordFields #-}- module HaskellWorks.Polysemy.Error.Types.YamlDecodeError   ( YamlDecodeError(..)   ) where  -import           Data.Aeson           (ToJSON (..), (.=))-import qualified Data.Aeson           as J-import           GHC.Generics-import           HaskellWorks.Prelude-newtype YamlDecodeError =-  YamlDecodeError-  { message :: Text-  }-  deriving (Eq, Generic, Show)--instance ToJSON YamlDecodeError where-  toJSON e =-        J.object-            [ "error" .= id @Text "YamlDecodeError"-            , "message" .= e.message-            ]+import           HaskellWorks.Error.Types.YamlDecodeError

@@ -1,6 +1,6 @@ cabal-version:          3.4 name:                   hw-polysemy-version:                0.3.1.1+version:                0.3.1.2 synopsis:               Opinionated polysemy library description:            Opinionated polysemy library. license:                Apache-2.0@@ -36,7 +36,7 @@ common ghc-prim                   { build-depends: ghc-prim                                    < 0.14   } common hedgehog                   { build-depends: hedgehog                                    < 1.6    } common http-conduit               { build-depends: http-conduit               >= 2.3        && < 2.4    }-common hw-prelude                 { build-depends: hw-prelude                 >= 0.0.1.0    && < 0.1    }+common hw-prelude                 { build-depends: hw-prelude                 >= 0.0.4.2    && < 0.1    } common microlens                  { build-depends: microlens                                   < 5      } common lens                       { build-depends: lens                                        < 5.4    } common mtl                        { build-depends: mtl                                         < 2.6    }