changeset 10816 | 37410518628e |
parent 10814 | 810ac1d21fd0 |
child 10944 | c4b3440eeac6 |
--- a/gameServer/Actions.hs Fri Feb 06 16:08:02 2015 +0300 +++ b/gameServer/Actions.hs Sat Feb 07 23:25:33 2015 +0300 @@ -356,6 +356,9 @@ ) joinedMidGame ) ri + rteams <- io $ room'sM rnc (L.nub . rejoinedTeams . fromJust . gameInfo) ri + mapM_ (processAction . RemoveTeam) rteams + mapM_ processAction $ ( SaveReplay : ModifyRoom