From 047a10bc9b9ef348ab57cbb58c6940a0858c38ac Mon Sep 17 00:00:00 2001
From: Julien Dessaux
Date: Fri, 22 Jan 2010 18:45:20 +0100
Subject: Fixed some types' functions.

---
 Hsbot/Types.hs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'Hsbot/Types.hs')

diff --git a/Hsbot/Types.hs b/Hsbot/Types.hs
index 25a7732..4e002db 100644
--- a/Hsbot/Types.hs
+++ b/Hsbot/Types.hs
@@ -29,9 +29,9 @@ data Config = Config
 
 -- | An IRC server
 data IrcServer = IrcServer
-    { address        :: String   -- the server's address
-    , port           :: PortID   -- the server's port
-    , channels       :: [String] -- a list of channels to join
+    { serverAddress  :: String   -- the server's address
+    , serverPort     :: PortID   -- the server's port
+    , joinChannels   :: [String] -- a list of channels to join
     , nickname       :: String   -- the hsbot's nickname
     , password       :: String   -- the hsbot's password, optional
     , realname       :: String   -- the hsbot's real name, optional
-- 
cgit v1.2.3