equal
deleted
inserted
replaced
284 chans <- roomSameClanChans |
284 chans <- roomSameClanChans |
285 return [AnswerClients chans ["EM", engineMsg cl]] |
285 return [AnswerClients chans ["EM", engineMsg cl]] |
286 where |
286 where |
287 engineMsg cl = toEngineMsg $ B.concat ["b", nick cl, "(team): ", msg, "\x20\x20"] |
287 engineMsg cl = toEngineMsg $ B.concat ["b", nick cl, "(team): ", msg, "\x20\x20"] |
288 |
288 |
289 handleCmd_inRoom _ = return [ProtocolError "Incorrect command (state: in room)"] |
289 handleCmd_inRoom (s:_) = return [ProtocolError $ "Incorrect command '" `B.append` s `B.append` "' (state: in room)"] |
|
290 |
|
291 handleCmd_inRoom [] = return [ProtocolError "Empty command (state: in room)"] |