--- a/gameServer/HWProtoInRoomState.hs Thu Apr 25 23:01:30 2019 +0200
+++ b/gameServer/HWProtoInRoomState.hs Fri Apr 26 23:21:27 2019 +0200
@@ -326,7 +326,8 @@
[Warning $ loc "A room with the same name already exists."]
else
[ModifyRoom roomUpdate,
- AnswerClients chans ("ROOM" : "UPD" : name rm : roomInfo (clientProto cl) (nick cl) (roomUpdate rm))]
+ AnswerClients chans ("ROOM" : "UPD" : name rm : roomInfo (clientProto cl) (nick cl) (roomUpdate rm)),
+ RegisterEvent RoomNameUpdate]
where
roomUpdate r = r{name = newName}