graflog 5.0.0 → 6.0.0
raw patch · 2 files changed
+6/−6 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
- Graflog.Logger: logEvent :: Logger m => Event -> m ()
- Graflog.Logger: logEvent' :: Console m => Event -> m ()
+ Graflog.Logger: logJSON :: Logger m => Event -> m ()
+ Graflog.Logger: logJSON' :: Console m => Event -> m ()
Files
- graflog.cabal +1/−1
- src/Graflog/Logger.hs +5/−5
graflog.cabal view
@@ -1,5 +1,5 @@ name: graflog-version: 5.0.0+version: 6.0.0 synopsis: Monadic correlated log events description: Please see README.md homepage: https://github.com/m-arnold/graflog#readme
src/Graflog/Logger.hs view
@@ -8,7 +8,7 @@ , CorrelationId(..) , EventId(..) , Action(..)- , logEvent'+ , logJSON' , jsonEncode , ToLog(..) , Log(..)@@ -96,7 +96,7 @@ toJSON Redacted = String redacted class Monad m => Logger m where- logEvent :: Event -> m ()+ logJSON :: Event -> m () newtype CorrelationId = CorrelationId Integer deriving (Eq, Show, Num, FromJSON, ToJSON)@@ -123,8 +123,8 @@ , "message" .= _message ] -logEvent' :: Console m => Event -> m ()-logEvent' = writeStdout . jsonEncode+logJSON' :: Console m => Event -> m ()+logJSON' = writeStdout . jsonEncode -- this will always work b/c UTF8 spec jsonEncode :: ToJSON a => a -> Text@@ -133,4 +133,4 @@ byteStringToText bs = fromJust $ decodeConvertText (UTF8 (bs :: ByteString)) instance Logger IO where- logEvent = logEvent'+ logJSON = logJSON'