diff -r dc06ef77a73a -r 2df519242d41 gameServer/Actions.hs --- a/gameServer/Actions.hs Sat Aug 25 22:02:21 2018 +0200 +++ b/gameServer/Actions.hs Sun Aug 26 14:37:02 2018 +0200 @@ -266,6 +266,8 @@ ModifyClient2 (fromJust newMasterId) (\c -> c{isMaster = True}) , AnswerClients [sendChan $ fromJust newMaster] ["ROOM_CONTROL_ACCESS", "1"] , AnswerClients thisRoomChans ["CLIENT_FLAGS", "+h", nick $ fromJust newMaster] + -- TODO: Send message to other clients, too (requires proper localization, however) + , AnswerClients [sendChan $ fromJust newMaster] ["CHAT", nickServer, loc "You're the new room master!"] ] processAction $ @@ -823,7 +825,7 @@ processAction CheckRecord = return () processAction (CheckFailed _) = return () processAction (CheckSuccess _) = return () -processAction (QueryReplay _) = return () +processAction (QueryReplay _) = processAction $ Warning $ loc "This server does not support replays!" #endif processAction (ShowReplay rname) = do