Archived
1
0
Fork 0

Began a complete rewrite of command and plugin management.

Wrote a command routing statement, added an IrcPlugin monad.
This commit is contained in:
Julien Dessaux 2010-02-04 21:05:37 +01:00
parent 047a10bc9b
commit fd8d5faf5f
12 changed files with 244 additions and 87 deletions

View file

@ -9,12 +9,12 @@ import Hsbot.Types
-- | Imported plugins goes there
defaultPlugins :: [String]
defaultPlugins = [ "Ping", "Quote" ]
defaultPlugins = [ "Ping", "Core" ]
-- | User server
kro :: IrcServer
kro = IrcServer
{ serverAddress = "perseus"
localhost :: IrcServer
localhost = IrcServer
{ serverAddress = "localhost"
, serverPort = PortNumber 6667
, joinChannels = ["#shbot"]
, nickname = "hsbot"
@ -27,6 +27,6 @@ kro = IrcServer
config :: Config
config = Config
{ commandPrefix = '@'
, ircServer = kro
, ircServer = localhost
}