Reorganoze examples in test/
This commit is contained in:
parent
3733b2217c
commit
09944406ef
3 changed files with 1 additions and 1 deletions
|
|
@ -21,7 +21,7 @@ myBotConfig = E.BotConfig
|
||||||
}
|
}
|
||||||
|
|
||||||
main = do
|
main = do
|
||||||
myHandler <- LH.verboseStreamHandler stderr L.INFO
|
myHandler <- LH.verboseStreamHandler stdout L.INFO
|
||||||
let myFormatter = LF.simpleLogFormatter "<$time> [$loggername/$prio] $msg"
|
let myFormatter = LF.simpleLogFormatter "<$time> [$loggername/$prio] $msg"
|
||||||
myFormattedHandler = LH.setFormatter myHandler myFormatter
|
myFormattedHandler = LH.setFormatter myHandler myFormatter
|
||||||
L.updateGlobalLogger L.rootLoggerName (L.setHandlers [myFormattedHandler])
|
L.updateGlobalLogger L.rootLoggerName (L.setHandlers [myFormattedHandler])
|
||||||
Loading…
Add table
Add a link
Reference in a new issue