gameServer/HWProtoLobbyState.hs
changeset 2155 d897222d3339
parent 2150 45b695f3a7b9
child 2352 7eaf82cf0890
--- 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)"]