gameServer/HWProtoInRoomState.hs
changeset 8514 896b283f41a2
parent 8513 cd85ab23f38b
child 8525 81630d47dc0f
equal deleted inserted replaced
8513:cd85ab23f38b 8514:896b283f41a2
   307         [KickRoomClient kickId |
   307         [KickRoomClient kickId |
   308             master
   308             master
   309             && isJust maybeClientId
   309             && isJust maybeClientId
   310             && (kickId /= thisClientId)
   310             && (kickId /= thisClientId)
   311             && sameRoom
   311             && sameRoom
   312             && ((isNothing $ gameInfo rm) || notOnly2Clans || teamsInGame kickCl = 0)
   312             && ((isNothing $ gameInfo rm) || notOnly2Clans || teamsInGame kickCl == 0)
   313         ]
   313         ]
   314 
   314 
   315 
   315 
   316 handleCmd_inRoom ["DELEGATE", newAdmin] = do
   316 handleCmd_inRoom ["DELEGATE", newAdmin] = do
   317     (thisClientId, rnc) <- ask
   317     (thisClientId, rnc) <- ask