# HG changeset patch
# User Wuzzy <Wuzzy2@mail.ru>
# Date 1535753155 -7200
# Node ID f4c8c6a174e8c8738f6f5767f3a0e1e50229e604
# Parent  3106d630d6b5322ddea61d4684429d68068797db
Display error when using /maxteams if not room master

diff -r 3106d630d6b5 -r f4c8c6a174e8 gameServer/HWProtoInRoomState.hs
--- a/gameServer/HWProtoInRoomState.hs	Fri Aug 31 23:49:32 2018 +0200
+++ b/gameServer/HWProtoInRoomState.hs	Sat Sep 01 00:05:55 2018 +0200
@@ -407,10 +407,12 @@
     return [AnswerClients s ["CHAT", n, B.unwords $ "/rnd" : rs], Random s rs]
 
 
-handleCmd_inRoom ["MAXTEAMS", n] = roomAdminOnly $ do
+handleCmd_inRoom ["MAXTEAMS", n] = do
     cl <- thisClient
     let m = readInt_ n
-    if m < 2 || m > cMaxTeams then
+    if not $ isMaster cl then
+        return [Warning $ loc "You're not the room master!"]
+    else if m < 2 || m > cMaxTeams then
         return [AnswerClients [sendChan cl] ["CHAT", nickServer, loc "/maxteams: specify number from 2 to 8"]]
     else
         return [ModifyRoom (\r -> r{teamsNumberLimit = m})]