Blammo 2.1.3.0 → 2.1.4.0
raw patch · 5 files changed
+16/−4 lines, 5 filesdep −markdown-unlitPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
Dependencies removed: markdown-unlit
API changes (from Hackage documentation)
+ Blammo.Logging: ($dmaskLoggerIO) :: forall (t :: (Type -> Type) -> Type -> Type) (n :: Type -> Type). (MonadLoggerIO m, MonadTrans t, MonadLoggerIO n, m ~ t n) => m (Loc -> LogSource -> LogLevel -> LogStr -> IO ())
+ Blammo.Logging: ($dmmonadLoggerLog) :: forall (m' :: Type -> Type) (t :: (Type -> Type) -> Type -> Type) msg. (MonadLogger m, MonadLogger m', MonadTrans t, MonadLogger (t m'), ToLogStr msg, m ~ t m') => Loc -> LogSource -> LogLevel -> msg -> m ()
+ Blammo.Logging: logTrace :: MonadLogger m => Message -> m ()
+ Blammo.Logging: logTraceNS :: MonadLogger m => LogSource -> Message -> m ()
- Blammo.Logging: data () => LogLevel
+ Blammo.Logging: data LogLevel
- Blammo.Logging: data () => Message
+ Blammo.Logging: data Message
- Blammo.Logging: data () => Series
+ Blammo.Logging: data Series
- Blammo.Logging.LogSettings.LogLevels: data () => LogLevel
+ Blammo.Logging.LogSettings.LogLevels: data LogLevel
- Blammo.Logging.Logger: data () => LoggedMessage
+ Blammo.Logging.Logger: data LoggedMessage
- Blammo.Logging.Setup: WithLogger :: ReaderT env m a -> WithLogger env m a
+ Blammo.Logging.Setup: WithLogger :: ReaderT env m a -> WithLogger env (m :: Type -> Type) a
- Blammo.Logging.Setup: data () => LoggingT (m :: Type -> Type) a
+ Blammo.Logging.Setup: data LoggingT (m :: Type -> Type) a
- Blammo.Logging.Setup: newtype WithLogger env m a
+ Blammo.Logging.Setup: newtype WithLogger env (m :: Type -> Type) a
- Blammo.Logging.Test: data () => LoggedMessage
+ Blammo.Logging.Test: data LoggedMessage
- Blammo.Logging.WithLogger: WithLogger :: ReaderT env m a -> WithLogger env m a
+ Blammo.Logging.WithLogger: WithLogger :: ReaderT env m a -> WithLogger env (m :: Type -> Type) a
- Blammo.Logging.WithLogger: newtype WithLogger env m a
+ Blammo.Logging.WithLogger: newtype WithLogger env (m :: Type -> Type) a
- Data.Aeson.Compat: data () => Key
+ Data.Aeson.Compat: data Key
- Data.Aeson.Compat: data () => KeyMap v
+ Data.Aeson.Compat: data KeyMap v
Files
- Blammo.cabal +2/−2
- CHANGELOG.md +4/−0
- README.lhs +0/−1
- README.md +0/−1
- src/Blammo/Logging.hs +10/−0
Blammo.cabal view
@@ -1,6 +1,6 @@ cabal-version: 1.18 name: Blammo-version: 2.1.3.0+version: 2.1.4.0 license: MIT license-file: LICENSE maintainer: Freckle Education@@ -84,6 +84,7 @@ test-suite readme type: exitcode-stdio-1.0 main-is: README.lhs+ build-tool-depends: markdown-unlit:markdown-unlit other-modules: Paths_Blammo default-language: Haskell2010 default-extensions:@@ -102,7 +103,6 @@ aeson >=1.5.2.0, base >=4.13.0.0 && <5, lens >=4.18.1,- markdown-unlit >=0.5.1, mtl >=2.2.2, text >=1.2.4.0
CHANGELOG.md view
@@ -1,5 +1,9 @@ ## [_Unreleased_](https://github.com/freckle/blammo/compare/Blammo-v2.1.3.0...main) +## [v2.1.4.0](https://github.com/freckle/blammo/compare/v2.1.3.0...Blammo-v2.1.4.0)++- Add `logTrace` and `logTraceNS` functions+ ## [v2.1.3.0](https://github.com/freckle/blammo/compare/v2.1.2.0...Blammo-v2.1.3.0) - Add `setLogSettingsColors` to support customizing colors
README.lhs view
@@ -35,7 +35,6 @@ import Data.Aeson import Data.Text (Text) import GHC.Generics (Generic)-import Text.Markdown.Unlit () import Control.Lens (lens) import Control.Monad.IO.Class (MonadIO) import Control.Monad.Reader (MonadReader, ReaderT (runReaderT))
README.md view
@@ -35,7 +35,6 @@ import Data.Aeson import Data.Text (Text) import GHC.Generics (Generic)-import Text.Markdown.Unlit () import Control.Lens (lens) import Control.Monad.IO.Class (MonadIO) import Control.Monad.Reader (MonadReader, ReaderT (runReaderT))
src/Blammo/Logging.hs view
@@ -18,6 +18,7 @@ -- | Import "Control.Monad.Logger.Aeson" if you want more -- *** Implicit call stack, no 'LogSource'+ , logTrace , logDebug , logInfo , logWarn@@ -26,6 +27,7 @@ -- *** Implicit call stack, with 'LogSource' , LogSource+ , logTraceNS , logDebugNS , logInfoNS , logWarnNS@@ -33,6 +35,14 @@ , logOtherNS ) where +import Prelude+ import Blammo.Logging.Logger import Control.Monad.Logger.Aeson import Data.Aeson (Series)++logTrace :: MonadLogger m => Message -> m ()+logTrace = logOther $ LevelOther "trace"++logTraceNS :: MonadLogger m => LogSource -> Message -> m ()+logTraceNS s = logOtherNS s $ LevelOther "trace"