Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Newer
Older
100644 38 lines (28 sloc) 0.72 kb
eb4b7b8 @clanehin Package move to Roguestar.Lib.
authored
1 module Roguestar.Lib.Logging
392d240 @clanehin Various changes to gameplay and UI for 0.8.
authored
2 (initLogging,
3 log_creature,
4 log_database,
82095f8 @clanehin Add forgotten Logging.hs to git.
authored
5 log_plane,
6 log_travel,
7 log_turns,
2a60c36 @clanehin Hopefully fixes crash issue when the DB monad itself experiences a ca…
authored
8 log_behavior,
82095f8 @clanehin Add forgotten Logging.hs to git.
authored
9 module System.Log.Logger)
10 where
11
12 import System.Log.Logger
3cca690 @clanehin Fix logging and configuration.
authored
13 import System.Log.Handler.Simple
82095f8 @clanehin Add forgotten Logging.hs to git.
authored
14
392d240 @clanehin Various changes to gameplay and UI for 0.8.
authored
15 initLogging :: Priority -> IO ()
3cca690 @clanehin Fix logging and configuration.
authored
16 initLogging prio =
17 do logger <- fileHandler "log/roguestar.log" prio
18 updateGlobalLogger rootLoggerName $ setHandlers [logger]
392d240 @clanehin Various changes to gameplay and UI for 0.8.
authored
19
20 log_creature :: String
21 log_creature = "lib.Creature"
22
82095f8 @clanehin Add forgotten Logging.hs to git.
authored
23 log_database :: String
392d240 @clanehin Various changes to gameplay and UI for 0.8.
authored
24 log_database = "lib.DB"
82095f8 @clanehin Add forgotten Logging.hs to git.
authored
25
26 log_plane :: String
392d240 @clanehin Various changes to gameplay and UI for 0.8.
authored
27 log_plane = "lib.Plane"
82095f8 @clanehin Add forgotten Logging.hs to git.
authored
28
29 log_travel :: String
392d240 @clanehin Various changes to gameplay and UI for 0.8.
authored
30 log_travel = "lib.Travel"
82095f8 @clanehin Add forgotten Logging.hs to git.
authored
31
32 log_turns :: String
392d240 @clanehin Various changes to gameplay and UI for 0.8.
authored
33 log_turns = "lib.Turns"
82095f8 @clanehin Add forgotten Logging.hs to git.
authored
34
2a60c36 @clanehin Hopefully fixes crash issue when the DB monad itself experiences a ca…
authored
35 log_behavior :: String
392d240 @clanehin Various changes to gameplay and UI for 0.8.
authored
36 log_behavior = "lib.Behavior"
2a60c36 @clanehin Hopefully fixes crash issue when the DB monad itself experiences a ca…
authored
37
Something went wrong with that request. Please try again.