# HG changeset patch
# User unc0rr
# Date 1369682675 -14400
# Node ID 38e8787483dbcebc6eb598fa7a28821ee03b6b9c
# Parent  1661c5ccb625b0199b099dad4d44c8f0498e7b65
'@' for server admin status, '+' for room admins

diff -r 1661c5ccb625 -r 38e8787483db gameServer/HWProtoCore.hs
--- a/gameServer/HWProtoCore.hs	Mon May 27 23:20:39 2013 +0400
+++ b/gameServer/HWProtoCore.hs	Mon May 27 23:24:35 2013 +0400
@@ -74,9 +74,9 @@
     let cl = rnc `client` fromJust maybeClientId
     let roomId = clientRoom rnc clientId
     let clRoom = room rnc roomId
-    let roomMasterSign = if isMaster cl then "@" else ""
+    let roomMasterSign = if isMaster cl then "+" else ""
     let adminSign = if isAdministrator cl then "@" else ""
-    let rInfo = if roomId /= lobbyId then B.concat [roomMasterSign, "room ", name clRoom] else adminSign `B.append` "lobby"
+    let rInfo = if roomId /= lobbyId then B.concat [adminSign, roomMasterSign, "room ", name clRoom] else adminSign `B.append` "lobby"
     let roomStatus = if isJust $ gameInfo clRoom then
             if teamsInGame cl > 0 then "(playing)" else "(spectating)"
             else