log 0.1.0 → 0.1.1

raw patch · 3 files changed

+6/−3 lines, 3 files

Files

log.cabal +1/−1
src/Log/Backend/StandardOutput.hs +3/−1
src/Log/Data.hs +2/−1

log.cabal view

@@ -1,5 +1,5 @@ name:                log-version:             0.1.0+version:             0.1.1 synopsis:            Structured logging solution with multiple backends  description:         A library that provides a way to record structured log messages with multiple backends.

src/Log/Backend/StandardOutput.hs view

@@ -1,11 +1,13 @@-{-# LANGUAGE OverloadedStrings, RecordWildCards #-}+{-# LANGUAGE CPP, OverloadedStrings, RecordWildCards #-} module Log.Backend.StandardOutput (stdoutLogger) where  import Data.Aeson.Encode.Pretty import Data.Aeson.Types import Data.ByteString.Lazy (toStrict) import Data.Time+#if !MIN_VERSION_time(1,5,0) import System.Locale+#endif import qualified Data.Text as T import qualified Data.Text.Encoding as T import qualified Data.Text.IO as T

src/Log/Data.hs view

@@ -13,7 +13,8 @@ data LogLevel = LogAttention | LogInfo | LogTrace   deriving (Bounded, Eq, Ord, Show) -instance NFData LogLevel+instance NFData LogLevel where+  rnf = (`seq` ())  -- | Represents message to be logged. data LogMessage = LogMessage {