Fixed some types' functions.

2010-01-22 18:45:20 +01:00 · 2010-01-22 18:45:20 +01:00 · 047a10bc9b
commit 047a10bc9b
parent 53870767c3
4 changed files with 9 additions and 9 deletions
--- a/Config.hs
+++ b/Config.hs
@ -14,9 +14,9 @@ defaultPlugins = [ "Ping", "Quote" ]
 -- | User server
 kro :: IrcServer
 kro = IrcServer
-    { address        = "kro.corp"
-    , port           = PortNumber 6667
-    , channels       = ["#shbot"]
+    { serverAddress  = "perseus"
+    , serverPort     = PortNumber 6667
+    , joinChannels   = ["#shbot"]
    , nickname       = "hsbot"
    , password       = ""
    , realname       = "The One True bot, with it's haskell soul."