diff -r 3ebe8cd30b84 -r cb249fa8e3da gameServer/HWProtoCore.hs --- a/gameServer/HWProtoCore.hs Wed May 27 03:56:17 2009 +0000 +++ b/gameServer/HWProtoCore.hs Wed May 27 15:29:30 2009 +0000 @@ -48,13 +48,15 @@ nick client, "[" ++ host client ++ "]", protoNumber2ver $ clientProto client, - roomInfo]] + "[" ++ roomInfo ++ "]"]] where maybeClient = find (\cl -> asknick == nick cl) clients noSuchClient = isNothing maybeClient client = fromJust maybeClient room = rooms IntMap.! roomID client - roomInfo = if roomID client /= 0 then "room " ++ (name room) else "lobby" + roomInfo = if roomID client /= 0 then roomMasterSign ++ "room " ++ (name room) else adminSign ++ "lobby" + roomMasterSign = if isMaster client then "@" else "" + adminSign = if isAdministrator client then "@" else "" handleCmd_loggedin clID clients rooms cmd =