equal
deleted
inserted
replaced
33 import Consts |
33 import Consts |
34 import ConfigFile |
34 import ConfigFile |
35 import EngineInteraction |
35 import EngineInteraction |
36 import FloodDetection |
36 import FloodDetection |
37 import HWProtoCore |
37 import HWProtoCore |
38 |
38 import Votes |
39 |
39 |
40 othersChans :: StateT ServerState IO [ClientChan] |
40 othersChans :: StateT ServerState IO [ClientChan] |
41 othersChans = do |
41 othersChans = do |
42 cl <- client's id |
42 cl <- client's id |
43 ri <- clientRoomA |
43 ri <- clientRoomA |