changeset 2337 | 723f1cbe2ef3 |
parent 2304 | a6e733ad0366 |
child 2352 | 7eaf82cf0890 |
2336:66c751f7a28e | 2337:723f1cbe2ef3 |
---|---|
25 where |
25 where |
26 clientNick = nick $ clients IntMap.! clID |
26 clientNick = nick $ clients IntMap.! clID |
27 |
27 |
28 |
28 |
29 handleCmd_inRoom clID clients rooms ["PART"] = |
29 handleCmd_inRoom clID clients rooms ["PART"] = |
30 if isMaster client then |
|
31 [RemoveRoom] |
|
32 else |
|
33 [RoomRemoveThisClient "part"] |
30 [RoomRemoveThisClient "part"] |
34 where |
31 where |
35 client = clients IntMap.! clID |
32 client = clients IntMap.! clID |
36 |
33 |
37 |
34 |