--- 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)