--- 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)"]