monad-logger 0.3.12 → 0.3.13
raw patch · 3 files changed
+22/−1 lines, 3 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
+ Control.Monad.Logger: class ToLogStr msg
+ Control.Monad.Logger: data LogStr :: *
+ Control.Monad.Logger: filterLogger :: (LogSource -> LogLevel -> Bool) -> LoggingT m a -> LoggingT m a
+ Control.Monad.Logger: toLogStr :: ToLogStr msg => msg -> LogStr
Files
- ChangeLog.md +5/−0
- Control/Monad/Logger.hs +16/−0
- monad-logger.cabal +1/−1
ChangeLog.md view
@@ -1,3 +1,8 @@+## 0.3.13++* Re-export LogStr from fast-logger [#56](https://github.com/kazu-yamamoto/logger/pull/56)+* Added `filterLogger`+ ## 0.3.12 * Use transformers-compat to provide universal ExceptT support [#53](https://github.com/kazu-yamamoto/logger/pull/53)
Control/Monad/Logger.hs view
@@ -28,11 +28,15 @@ , MonadLoggerIO (..) , LogLevel(..) , LogSource+ -- * Re-export from fast-logger+ , LogStr+ , ToLogStr(..) -- * Helper transformer , LoggingT (..) , runStderrLoggingT , runStdoutLoggingT , withChannelLogger+ , filterLogger , NoLoggingT (..) #if WITH_TEMPLATE_HASKELL -- * TH logging@@ -586,6 +590,18 @@ dumpLogs chan = liftIO $ sequence_ =<< atomically (untilM (readTBChan chan) (isEmptyTBChan chan))++-- | Only log messages passing the given predicate function.+--+-- This can be a convenient way, for example, to ignore debug level messages.+--+-- Since 0.3.13+filterLogger :: (LogSource -> LogLevel -> Bool)+ -> LoggingT m a+ -> LoggingT m a+filterLogger p (LoggingT f) = LoggingT $ \logger ->+ f $ \loc src level msg ->+ when (p src level) $ logger loc src level msg instance MonadCont m => MonadCont (LoggingT m) where callCC f = LoggingT $ \i -> callCC $ \c -> runLoggingT (f (LoggingT . const . c)) i
monad-logger.cabal view
@@ -1,5 +1,5 @@ name: monad-logger-version: 0.3.12+version: 0.3.13 synopsis: A class of monads which can log messages. description: Hackage documentation generation is not reliable. For up to date documentation, please see: <http://www.stackage.org/package/monad-logger>. homepage: https://github.com/kazu-yamamoto/logger