changeset 10058 | 4ed428389c4e |
parent 10041 | 82d062e36e96 |
child 10065 | 35bd559c1973 |
10057:795f5f918c8c | 10058:4ed428389c4e |
---|---|
275 |
275 |
276 |
276 |
277 data VoteType = VoteKick B.ByteString |
277 data VoteType = VoteKick B.ByteString |
278 |
278 |
279 |
279 |
280 newVote :: VoteType -> Voting |
280 newVoting :: VoteType -> Voting |
281 newVote = Voting 2 [] [] |
281 newVoting = Voting 2 [] [] |
282 |
282 |
283 |
283 |
284 data AccountInfo = |
284 data AccountInfo = |
285 HasAccount B.ByteString Bool Bool |
285 HasAccount B.ByteString Bool Bool |
286 | Guest |
286 | Guest |