changeset 14841 | 111c4d750c6d |
parent 14421 | 94f10f69fe76 |
child 15445 | 88770c206c31 |
14840:b02581c5b0c5 | 14841:111c4d750c6d |
---|---|
107 |
107 |
108 |
108 |
109 data Event = LobbyChatMessage |
109 data Event = LobbyChatMessage |
110 | EngineMessage |
110 | EngineMessage |
111 | RoomJoin |
111 | RoomJoin |
112 | RoomNameUpdate |
|
112 |
113 |
113 type EventsInfo = [(Int, UTCTime)] |
114 type EventsInfo = [(Int, UTCTime)] |
114 |
115 |
115 newEventsInfo :: EventsInfo |
116 newEventsInfo :: EventsInfo |
116 newEventsInfo = [] |
117 newEventsInfo = [] |