| changeset 2001 | d909152bdc21 |
| parent 1994 | 990f341a2332 |
| child 2104 | b2c50a7480ea |
--- a/gameServer/Actions.hs Fri Apr 17 17:02:24 2009 +0000 +++ b/gameServer/Actions.hs Fri Apr 17 19:58:21 2009 +0000 @@ -117,6 +117,7 @@ processAction (clID, serverInfo, clients, rooms) (ByeClient msg) = do + infoM "Clients" ((show $ clientUID client) ++ " quits: " ++ msg) (_, _, newClients, newRooms) <- if roomID client /= 0 then processAction (clID, serverInfo, clients, rooms)