author | unc0rr |
Tue, 06 Nov 2012 00:28:47 +0400 | |
changeset 7972 | 0dffb91eeb82 |
parent 7968 | be4503361ead |
child 7974 | 7ac6699b6228 |
--- a/gameServer/Actions.hs Mon Nov 05 01:05:23 2012 +0100 +++ b/gameServer/Actions.hs Tue Nov 06 00:28:47 2012 +0400 @@ -276,7 +276,7 @@ newRoom' <- io $ room'sM rnc id ri chans <- liftM (map sendChan) $! sameProtoClientsS proto - processAction $ AnswerClients chans ("ROOM" : "UPD" : oldRoomName : roomInfo newRoomName newRoom') + processAction $ AnswerClients chans ("ROOM" : "UPD" : oldRoomName : roomInfo (nick newMaster) newRoom') processAction (AddRoom roomName roomPassword) = do