module System.Log.Util
( logTest
)
where
import System.Log.Logger
-- | Test function to generate every kind of log message
logTest :: String -> IO ()
logTest loggerName = do
debugM loggerName "log test message DEBUG 1 of 8"
infoM loggerName "log test message INFO 2 of 8"
noticeM loggerName "log test message NOTICE 3 of 8"
warningM loggerName "log test message WARNING 4 of 8"
errorM loggerName "log test message ERROR 5 of 8"
criticalM loggerName "log test message CRITICAL 6 of 8"
alertM loggerName "log test message ALERT 7 of 8"
emergencyM loggerName "log test message EMERGENCY 8 of 8"