diff -r d00562929f28 -r 6bb64d38003e gameServer/Actions.hs
--- a/gameServer/Actions.hs	Sat Jan 22 22:35:53 2011 +0300
+++ b/gameServer/Actions.hs	Thu Jan 27 22:55:11 2011 +0100
@@ -392,7 +392,7 @@
 
 
 processAction (clID, serverInfo, clients, rooms) (KickClient kickID) = do
-    let client = clients ! clID
+    let client = clients ! kickID
     currentTime <- getCurrentTime
     liftM2 replaceID (return clID) (processAction (kickID, serverInfo{lastLogins = (host client, (addUTCTime 60 $ currentTime, "60 seconds ban")) : lastLogins serverInfo}, clients, rooms) $ ByeClient "Kicked")