diff -r 3d2917be12c3 -r d897222d3339 gameServer/HWProtoLobbyState.hs --- a/gameServer/HWProtoLobbyState.hs Fri Jun 12 00:39:36 2009 +0000 +++ b/gameServer/HWProtoLobbyState.hs Fri Jun 12 08:47:05 2009 +0000 @@ -111,6 +111,8 @@ handleCmd_lobby clID clients rooms ["JOIN_ROOM", roomName] = handleCmd_lobby clID clients rooms ["JOIN_ROOM", roomName, ""] + --------------------------- + -- Administrator's stuff -- handleCmd_lobby clID clients rooms ["KICK", kickNick] = if not $ isAdministrator client then @@ -148,4 +150,13 @@ client = clients IntMap.! clID +handleCmd_lobby clID clients rooms ["CLEAR_ACCOUNTS_CACHE"] = + if not $ isAdministrator client then + [] + else + [ClearAccountsCache] + where + client = clients IntMap.! clID + + handleCmd_lobby clID _ _ _ = [ProtocolError "Incorrect command (state: in lobby)"]