--- a/netserver/Miscutils.hs Tue Oct 21 13:39:34 2008 +0000
+++ b/netserver/Miscutils.hs Tue Oct 21 16:53:34 2008 +0000
@@ -16,7 +16,8 @@
nick :: String,
protocol :: Word16,
room :: String,
- isMaster :: Bool
+ isMaster :: Bool,
+ forceQuit :: Bool
}
instance Eq ClientInfo where