gameServer/Actions.hs
changeset 2116 dec7ead2d178
parent 2104 b2c50a7480ea
child 2118 0ebcc98ebc1a
--- 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