packages feed

katip 0.4.0.0 → 0.4.1.0

raw patch · 3 files changed

+23/−4 lines, 3 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

+ Katip.Core: instance (Katip.Core.Katip m, GHC.Base.Monoid s) => Katip.Core.Katip (Control.Monad.Trans.Writer.Strict.WriterT s m)
+ Katip.Core: instance (Katip.Core.Katip m, GHC.Base.Monoid w) => Katip.Core.Katip (Control.Monad.Trans.RWS.Lazy.RWST r w s m)
+ Katip.Core: instance (Katip.Core.Katip m, GHC.Base.Monoid w) => Katip.Core.Katip (Control.Monad.Trans.RWS.Strict.RWST r w s m)
+ Katip.Core: instance Katip.Core.Katip m => Katip.Core.Katip (Control.Monad.Trans.State.Strict.StateT s m)
- Katip: itemApp :: Lens' (Item a_amWt) Namespace
+ Katip: itemApp :: Lens' (Item a_anfx) Namespace
- Katip: itemEnv :: Lens' (Item a_amWt) Environment
+ Katip: itemEnv :: Lens' (Item a_anfx) Environment
- Katip: itemHost :: Lens' (Item a_amWt) HostName
+ Katip: itemHost :: Lens' (Item a_anfx) HostName
- Katip: itemLoc :: Lens' (Item a_amWt) (Maybe Loc)
+ Katip: itemLoc :: Lens' (Item a_anfx) (Maybe Loc)
- Katip: itemMessage :: Lens' (Item a_amWt) LogStr
+ Katip: itemMessage :: Lens' (Item a_anfx) LogStr
- Katip: itemNamespace :: Lens' (Item a_amWt) Namespace
+ Katip: itemNamespace :: Lens' (Item a_anfx) Namespace
- Katip: itemPayload :: Lens (Item a_amWt) (Item a_asWH) a_amWt a_asWH
+ Katip: itemPayload :: Lens (Item a_anfx) (Item a_atsA) a_anfx a_atsA
- Katip: itemProcess :: Lens' (Item a_amWt) ProcessID
+ Katip: itemProcess :: Lens' (Item a_anfx) ProcessID
- Katip: itemSeverity :: Lens' (Item a_amWt) Severity
+ Katip: itemSeverity :: Lens' (Item a_anfx) Severity
- Katip: itemThread :: Lens' (Item a_amWt) ThreadIdText
+ Katip: itemThread :: Lens' (Item a_anfx) ThreadIdText
- Katip: itemTime :: Lens' (Item a_amWt) UTCTime
+ Katip: itemTime :: Lens' (Item a_anfx) UTCTime
- Katip.Core: itemApp :: Lens' (Item a_amWt) Namespace
+ Katip.Core: itemApp :: Lens' (Item a_anfx) Namespace
- Katip.Core: itemEnv :: Lens' (Item a_amWt) Environment
+ Katip.Core: itemEnv :: Lens' (Item a_anfx) Environment
- Katip.Core: itemHost :: Lens' (Item a_amWt) HostName
+ Katip.Core: itemHost :: Lens' (Item a_anfx) HostName
- Katip.Core: itemLoc :: Lens' (Item a_amWt) (Maybe Loc)
+ Katip.Core: itemLoc :: Lens' (Item a_anfx) (Maybe Loc)
- Katip.Core: itemMessage :: Lens' (Item a_amWt) LogStr
+ Katip.Core: itemMessage :: Lens' (Item a_anfx) LogStr
- Katip.Core: itemNamespace :: Lens' (Item a_amWt) Namespace
+ Katip.Core: itemNamespace :: Lens' (Item a_anfx) Namespace
- Katip.Core: itemPayload :: Lens (Item a_amWt) (Item a_asWH) a_amWt a_asWH
+ Katip.Core: itemPayload :: Lens (Item a_anfx) (Item a_atsA) a_anfx a_atsA
- Katip.Core: itemProcess :: Lens' (Item a_amWt) ProcessID
+ Katip.Core: itemProcess :: Lens' (Item a_anfx) ProcessID
- Katip.Core: itemSeverity :: Lens' (Item a_amWt) Severity
+ Katip.Core: itemSeverity :: Lens' (Item a_anfx) Severity
- Katip.Core: itemThread :: Lens' (Item a_amWt) ThreadIdText
+ Katip.Core: itemThread :: Lens' (Item a_anfx) ThreadIdText
- Katip.Core: itemTime :: Lens' (Item a_amWt) UTCTime
+ Katip.Core: itemTime :: Lens' (Item a_anfx) UTCTime

Files

changelog.md view
@@ -1,3 +1,8 @@+0.4.1.0+=======+* Add Katip instances for Strict StateT, WriterT, RWST.+* Add Katip instances for Lazy RWST.+ 0.4.0.0 ======= * Drop unsafe _ioLogEnv for safe ioLogEnv
katip.cabal view
@@ -1,5 +1,5 @@ name:                katip-version:             0.4.0.0+version:             0.4.1.0 synopsis:            A structured logging framework. description:   Katip is a structured logging framework. See README.md for more details.
src/Katip/Core.hs view
@@ -35,8 +35,12 @@ import           Control.Monad.Trans.Maybe import           Control.Monad.Trans.Reader import           Control.Monad.Trans.Resource-import           Control.Monad.Trans.State-import           Control.Monad.Trans.Writer+import           Control.Monad.Trans.State.Lazy (StateT)+import qualified Control.Monad.Trans.State.Strict as Strict (StateT)+import           Control.Monad.Trans.Writer.Lazy (WriterT)+import qualified Control.Monad.Trans.Writer.Strict as Strict (WriterT)+import           Control.Monad.Trans.RWS.Lazy (RWST)+import qualified Control.Monad.Trans.RWS.Strict as Strict (RWST) import           Data.Aeson                   (FromJSON (..), ToJSON (..),                                                object) import qualified Data.Aeson                   as A@@ -623,12 +627,22 @@ instance Katip m => Katip (MaybeT m) where     getLogEnv = lift getLogEnv - instance Katip m => Katip (StateT s m) where     getLogEnv = lift getLogEnv +instance (Katip m, Monoid w) => Katip (RWST r w s m) where+    getLogEnv = lift getLogEnv +instance (Katip m, Monoid w) => Katip (Strict.RWST r w s m) where+    getLogEnv = lift getLogEnv++instance Katip m => Katip (Strict.StateT s m) where+    getLogEnv = lift getLogEnv+ instance (Katip m, Monoid s) => Katip (WriterT s m) where+    getLogEnv = lift getLogEnv++instance (Katip m, Monoid s) => Katip (Strict.WriterT s m) where     getLogEnv = lift getLogEnv  instance (Katip m) => Katip (ResourceT m) where