log-base 0.7.1.1 → 0.7.2.0
raw patch · 4 files changed
+19/−10 lines, 4 filesdep +mmorphdep ~basePVP ok
version bump matches the API change (PVP)
Dependencies added: mmorph
Dependency ranges changed: base
API changes (from Hackage documentation)
+ Log.Monad: instance Control.Monad.Morph.MFunctor Log.Monad.LogT
Files
- CHANGELOG.md +4/−1
- README.md +2/−3
- log-base.cabal +4/−4
- src/Log/Monad.hs +9/−2
CHANGELOG.md view
@@ -1,4 +1,7 @@-# log-base-0.7.2 (2017-06-19)+# log-base-0.7.2.0 (2017-08-10)+* Add 'MFunctor LogT' instance++# log-base-0.7.1.1 (2017-06-19) * mkBulkLogger now uses a bounded queue to interact with the logger thread. # log-base-0.7.1 (2017-03-16)
README.md view
@@ -1,6 +1,5 @@ # log-base [](https://hackage.haskell.org/package/log-base) [](http://travis-ci.org/scrive/log) -Base package for the `log` library. Includes only the standard output+Base package for the `log` library suite. Includes only the standard output back end. Use this package in conjunction with `log-elasticsearch` or-`log-postgres`, depending on which back end you need. Use the `log`-library if you need all back ends.+`log-postgres`, depending on which back end you need.
log-base.cabal view
@@ -1,12 +1,11 @@ name: log-base-version: 0.7.1.1+version: 0.7.2.0 synopsis: Structured logging solution (base package) description: A library that provides a way to record structured log messages. Use this package in conjunction with 'log-elasticsearch' or 'log-postgres', depending- on which back end you need. Use the 'log' library- if you need all back ends.+ on which back end you need. homepage: https://github.com/scrive/log@@ -22,7 +21,7 @@ build-type: Simple cabal-version: >=1.10 extra-source-files: CHANGELOG.md, README.md-tested-with: GHC == 7.8.4, GHC == 7.10.3, GHC == 8.0.2+tested-with: GHC == 7.10.3, GHC == 8.0.2, GHC == 8.2.1 Source-repository head Type: git@@ -44,6 +43,7 @@ bytestring, deepseq, exceptions >=0.6,+ mmorph >=1.0.9 && <1.2, monad-control >=0.3, monad-time >= 0.2, mtl,
src/Log/Monad.hs view
@@ -14,10 +14,11 @@ import Control.Monad.Base import Control.Monad.Catch import Control.Monad.Error.Class-import Control.Monad.State.Class-import Control.Monad.Writer.Class+import Control.Monad.Morph (MFunctor (..)) import Control.Monad.Reader+import Control.Monad.State.Class import Control.Monad.Trans.Control+import Control.Monad.Writer.Class import Data.Aeson import Data.Aeson.Types import Data.Text (Text)@@ -71,6 +72,12 @@ -- | Transform the computation inside a 'LogT'. mapLogT :: (m a -> n b) -> LogT m a -> LogT n b mapLogT f = LogT . mapReaderT f . unLogT++-- | @'hoist' = 'mapLogT'@+--+-- @since 0.7.2+instance MFunctor LogT where+ hoist = mapLogT instance MonadTransControl LogT where #if MIN_VERSION_monad_control(1,0,0)