hw-prelude 0.0.0.2 → 0.0.0.3
raw patch · 6 files changed
+1/−65 lines, 6 filesPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
API changes (from Hackage documentation)
- HaskellWorks.Error.Types: RenderedError :: Text -> Value -> RenderedError
- HaskellWorks.Error.Types: class ToRenderedError a
- HaskellWorks.Error.Types: data RenderedError
- HaskellWorks.Error.Types: toRenderedError :: ToRenderedError a => a -> RenderedError
- HaskellWorks.Error.Types.All: RenderedError :: Text -> Value -> RenderedError
- HaskellWorks.Error.Types.All: [$sel:error:RenderedError] :: RenderedError -> Text
- HaskellWorks.Error.Types.All: [$sel:payload:RenderedError] :: RenderedError -> Value
- HaskellWorks.Error.Types.All: class ToRenderedError a
- HaskellWorks.Error.Types.All: data RenderedError
- HaskellWorks.Error.Types.All: toRenderedError :: ToRenderedError a => a -> RenderedError
- HaskellWorks.Error.Types.GenericError: instance HaskellWorks.Error.Types.RenderedError.ToRenderedError HaskellWorks.Error.Types.GenericError.GenericError
- HaskellWorks.Error.Types.RenderedError: RenderedError :: Text -> Value -> RenderedError
- HaskellWorks.Error.Types.RenderedError: [$sel:error:RenderedError] :: RenderedError -> Text
- HaskellWorks.Error.Types.RenderedError: [$sel:payload:RenderedError] :: RenderedError -> Value
- HaskellWorks.Error.Types.RenderedError: class ToRenderedError a
- HaskellWorks.Error.Types.RenderedError: data RenderedError
- HaskellWorks.Error.Types.RenderedError: instance Data.Aeson.Types.ToJSON.ToJSON HaskellWorks.Error.Types.RenderedError.RenderedError
- HaskellWorks.Error.Types.RenderedError: instance GHC.Classes.Eq HaskellWorks.Error.Types.RenderedError.RenderedError
- HaskellWorks.Error.Types.RenderedError: instance GHC.Generics.Generic HaskellWorks.Error.Types.RenderedError.RenderedError
- HaskellWorks.Error.Types.RenderedError: instance GHC.Show.Show HaskellWorks.Error.Types.RenderedError.RenderedError
- HaskellWorks.Error.Types.RenderedError: instance HaskellWorks.Error.Types.RenderedError.ToRenderedError HaskellWorks.Error.Types.RenderedError.RenderedError
- HaskellWorks.Error.Types.RenderedError: toRenderedError :: ToRenderedError a => a -> RenderedError
- HaskellWorks.Error.Types.TimedOut: instance HaskellWorks.Error.Types.RenderedError.ToRenderedError HaskellWorks.Error.Types.TimedOut.TimedOut
Files
- hw-prelude.cabal +1/−2
- src/HaskellWorks/Error/Types.hs +0/−4
- src/HaskellWorks/Error/Types/All.hs +0/−4
- src/HaskellWorks/Error/Types/GenericError.hs +0/−11
- src/HaskellWorks/Error/Types/RenderedError.hs +0/−32
- src/HaskellWorks/Error/Types/TimedOut.hs +0/−12
hw-prelude.cabal view
@@ -1,6 +1,6 @@ cabal-version: 3.4 name: hw-prelude-version: 0.0.0.2+version: 0.0.0.3 synopsis: Opinionated prelude library description: Opinionated prelude library. license: Apache-2.0@@ -90,7 +90,6 @@ HaskellWorks.Error.Types HaskellWorks.Error.Types.All HaskellWorks.Error.Types.GenericError- HaskellWorks.Error.Types.RenderedError HaskellWorks.Error.Types.TimedOut HaskellWorks.IO.Network.NamedPipe HaskellWorks.IO.Network.Port
src/HaskellWorks/Error/Types.hs view
@@ -1,11 +1,7 @@ module HaskellWorks.Error.Types ( -- * Error types GenericError(GenericError),- RenderedError(RenderedError), TimedOut(TimedOut),-- -- * Type classes- ToRenderedError(..), ) where import HaskellWorks.Error.Types.All
src/HaskellWorks/Error/Types/All.hs view
@@ -3,12 +3,8 @@ module HaskellWorks.Error.Types.All ( GenericError (..),- RenderedError (..), TimedOut(..),-- ToRenderedError (..), ) where import HaskellWorks.Error.Types.GenericError-import HaskellWorks.Error.Types.RenderedError import HaskellWorks.Error.Types.TimedOut
src/HaskellWorks/Error/Types/GenericError.hs view
@@ -6,10 +6,6 @@ GenericError (..), ) where -import Data.Aeson-import Data.Generics.Product.Any-import HaskellWorks.Error.Types.RenderedError-import Lens.Micro import HaskellWorks.Prelude @@ -17,10 +13,3 @@ { message :: Text } deriving (Eq, Generic, Show)--instance ToRenderedError GenericError where- toRenderedError e =- RenderedError- { error = "GenericError"- , payload = toJSON $ e ^. the @"message"- }
− src/HaskellWorks/Error/Types/RenderedError.hs
@@ -1,32 +0,0 @@-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE DuplicateRecordFields #-}-{-# LANGUAGE TypeSynonymInstances #-}--module HaskellWorks.Error.Types.RenderedError (- RenderedError (..),-- ToRenderedError (..),-) where--import Data.Aeson--import HaskellWorks.Prelude--data RenderedError = RenderedError- { error :: Text- , payload :: Value- }- deriving (Eq, Generic, Show)--instance ToJSON RenderedError where- toJSON e =- object- [ "error" .= error e- , "payload" .= payload e- ]--class ToRenderedError a where- toRenderedError :: a -> RenderedError--instance ToRenderedError RenderedError where- toRenderedError = id
src/HaskellWorks/Error/Types/TimedOut.hs view
@@ -6,21 +6,9 @@ TimedOut (..), ) where -import Data.Aeson-import Data.Generics.Product.Any-import HaskellWorks.Error.Types.RenderedError-import Lens.Micro- import HaskellWorks.Prelude newtype TimedOut = TimedOut { message :: Text } deriving (Eq, Generic, Show)--instance ToRenderedError TimedOut where- toRenderedError e =- RenderedError- { error = "TimedOut"- , payload = toJSON $ e ^. the @"message"- }