changeset 4998 | cdcdf37e5532 |
parent 4991 | 90d1fb9fc2e1 |
child 4999 | a3a09b107652 |
--- a/gameServer/Actions.hs Wed Mar 09 22:39:35 2011 +0100 +++ b/gameServer/Actions.hs Thu Mar 10 22:28:40 2011 +0300 @@ -138,6 +138,8 @@ put $! s{removedClients = ci `Set.insert` removedClients s} processAction (DeleteClient ci) = do + io $ debugM "Clients" $ "DeleteClient: " ++ show ci + rnc <- gets roomsClients io $ removeClient rnc ci