graflog 6.0.0 → 6.1.0
raw patch · 2 files changed
+18/−1 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
+ Graflog.Logger: instance (Graflog.Logger.Logger m, GHC.Base.Monoid w) => Graflog.Logger.Logger (Control.Monad.Trans.Writer.Lazy.WriterT w m)
+ Graflog.Logger: instance Graflog.Logger.Logger m => Graflog.Logger.Logger (Control.Monad.Trans.Except.ExceptT e m)
+ Graflog.Logger: instance Graflog.Logger.Logger m => Graflog.Logger.Logger (Control.Monad.Trans.Reader.ReaderT r m)
+ Graflog.Logger: instance Graflog.Logger.Logger m => Graflog.Logger.Logger (Control.Monad.Trans.State.Lazy.StateT s m)
Files
- graflog.cabal +2/−1
- src/Graflog/Logger.hs +16/−0
graflog.cabal view
@@ -1,5 +1,5 @@ name: graflog-version: 6.0.0+version: 6.1.0 synopsis: Monadic correlated log events description: Please see README.md homepage: https://github.com/m-arnold/graflog#readme@@ -22,6 +22,7 @@ , aeson , bytestring , containers+ , mtl default-language: Haskell2010 default-extensions: GeneralizedNewtypeDeriving DeriveFunctor FlexibleContexts FlexibleInstances
src/Graflog/Logger.hs view
@@ -27,6 +27,10 @@ import Data.String (IsString(..)) import Data.Text (Text(..)) import Data.Text.Conversions (decodeConvertText, UTF8(..), toText)+import Control.Monad.Except+import Control.Monad.Reader+import Control.Monad.Writer+import Control.Monad.State import Graflog.Console @@ -134,3 +138,15 @@ instance Logger IO where logJSON = logJSON'++instance (Logger m) => Logger (ExceptT e m) where+ logJSON = lift . logJSON++instance (Logger m) => Logger (ReaderT r m) where+ logJSON = lift . logJSON++instance (Logger m, Monoid w) => Logger (WriterT w m) where+ logJSON = lift . logJSON++instance (Logger m) => Logger (StateT s m) where+ logJSON = lift . logJSON