diff -r 1c9a8081aef6 -r dec7ead2d178 gameServer/Actions.hs --- a/gameServer/Actions.hs Sun May 24 19:49:10 2009 +0000 +++ b/gameServer/Actions.hs Mon May 25 15:24:27 2009 +0000 @@ -289,7 +289,7 @@ processAction (clID, serverInfo, clients, rooms) (CheckRegistered) = do - writeChan (dbQueries serverInfo) $ CheckAccount client + writeChan (dbQueries serverInfo) $ CheckAccount (clientUID client) (nick client) (host client) return (clID, serverInfo, clients, rooms) where client = clients ! clID