diff -r e33ee5ef5d9d -r 0da6ba2f1f93 gameServer/HWProtoInRoomState.hs --- a/gameServer/HWProtoInRoomState.hs Fri Dec 13 00:00:49 2013 +0400 +++ b/gameServer/HWProtoInRoomState.hs Fri Dec 13 00:16:02 2013 +0400 @@ -378,6 +378,10 @@ cl <- thisClient return [ModifyRoom (\r -> r{isSpecial = False}) | isAdministrator cl] +handleCmd_inRoom ["GREETING", msg] = do + cl <- thisClient + rm <- thisRoom + return [ModifyRoom (\r -> r{greeting = msg}) | isAdministrator cl || (isMaster cl && (not $ isSpecial rm))] handleCmd_inRoom ["LIST"] = return [] -- for old clients (<= 0.9.17)