# HG changeset patch # User unc0rr # Date 1251881445 0 # Node ID 3ab763dc14a3404c484dd39936cedf3435b7f8b5 # Parent ba22dc845b2dc2db2d477d021e3a97200c0457dd Send leaving message and remove room admin's teams when he exits diff -r ba22dc845b2d -r 3ab763dc14a3 gameServer/Actions.hs --- a/gameServer/Actions.hs Wed Sep 02 08:45:15 2009 +0000 +++ b/gameServer/Actions.hs Wed Sep 02 08:50:45 2009 +0000 @@ -194,7 +194,9 @@ if roomID client /= 0 then if isMaster client then if (gameinprogress room) && (playersIn room > 1) then - changeMaster + (changeMaster >>= (\state -> foldM processAction state + [AnswerOthersInRoom ["LEFT", nick client, msg], + RemoveClientTeams clID])) else -- not in game processAction (clID, serverInfo, clients, rooms) RemoveRoom else -- not master