snaplet-hslogger 1.0.0.1 → 1.0.0.2
raw patch · 3 files changed
+5/−4 lines, 3 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
resources/hslogger/devel.cfg view
@@ -1,4 +1,4 @@ default_logger = "Snap.Global" log_level = DEBUG-log_format = "$time : $loggername : [$prio] $msg"+log_format = "$$time : $$loggername : [$$prio] $$msg" log_file = "./handlers.log"
snaplet-hslogger.cabal view
@@ -1,5 +1,5 @@ Name: snaplet-hslogger-Version: 1.0.0.1+Version: 1.0.0.2 Synopsis: Snap framework snaplet for the Logger API library. Homepage: https://github.com/ixmatus/snaplet-logger License: BSD3
src/Snap/Snaplet/Log.hs view
@@ -25,12 +25,13 @@ initLogger = makeSnaplet "hslogger" description datadir $ do conf <- getSnapletUserConfig - logfile <- liftIO $ require conf "log_file"+ logname <- liftIO $ require conf "default_logger" loglevel <- liftIO $ require conf "log_level" logformat <- liftIO $ require conf "log_format"- logname <- liftIO $ require conf "default_logger"+ logfile <- liftIO $ require conf "log_file" let lvl = (read loglevel) :: Priority+ h <- liftIO $ fileHandler logfile lvl >>= \lh -> return $ setFormatter lh (simpleLogFormatter logformat)