| changeset 1391 | 735f6d43780b |
| parent 1383 | d20e6e8928e3 |
| child 1396 | abb28dcb6d0d |
| 1390:914fa66aec05 | 1391:735f6d43780b |
|---|---|
14 chan :: TChan [String], |
14 chan :: TChan [String], |
15 handle :: Handle, |
15 handle :: Handle, |
16 nick :: String, |
16 nick :: String, |
17 protocol :: Word16, |
17 protocol :: Word16, |
18 room :: String, |
18 room :: String, |
19 isMaster :: Bool |
19 isMaster :: Bool, |
20 forceQuit :: Bool |
|
20 } |
21 } |
21 |
22 |
22 instance Eq ClientInfo where |
23 instance Eq ClientInfo where |
23 a1 == a2 = handle a1 == handle a2 |
24 a1 == a2 = handle a1 == handle a2 |
24 |
25 |