equal
deleted
inserted
replaced
38 #endif |
38 #endif |
39 |
39 |
40 |
40 |
41 setupLoggers :: IO () |
41 setupLoggers :: IO () |
42 setupLoggers = do |
42 setupLoggers = do |
43 updateGlobalLogger "Clients" (setLevel DEBUG) |
43 updateGlobalLogger "Clients" (setLevel NOTICE) |
44 updateGlobalLogger "Core" (setLevel NOTICE) |
44 updateGlobalLogger "Core" (setLevel NOTICE) |
45 updateGlobalLogger "REPLAYS" (setLevel NOTICE) |
45 updateGlobalLogger "REPLAYS" (setLevel NOTICE) |
46 |
46 |
47 |
47 |
48 server :: ServerInfo -> IO () |
48 server :: ServerInfo -> IO () |