gameServer/HWProtoInRoomState.hs
changeset 11508 a4ad8a9e0f69
parent 11414 6f119783a1ad
child 11556 af9aa8d5863c
equal deleted inserted replaced
11507:bd9a2f1b0080 11508:a4ad8a9e0f69
   340     return
   340     return
   341         [KickRoomClient kickId |
   341         [KickRoomClient kickId |
   342             isJust maybeClientId
   342             isJust maybeClientId
   343             && (kickId /= thisClientId)
   343             && (kickId /= thisClientId)
   344             && sameRoom
   344             && sameRoom
       
   345             && (not $ hasSuperPower kickCl)
   345             && ((isNothing $ gameInfo rm) || notOnly2Players || teamsInGame kickCl == 0)
   346             && ((isNothing $ gameInfo rm) || notOnly2Players || teamsInGame kickCl == 0)
   346         ]
   347         ]
   347 
   348 
   348 
   349 
   349 handleCmd_inRoom ["DELEGATE", newAdmin] = do
   350 handleCmd_inRoom ["DELEGATE", newAdmin] = do