--- a/netserver/Miscutils.hs Wed Oct 22 21:41:00 2008 +0000
+++ b/netserver/Miscutils.hs Thu Oct 23 15:12:38 2008 +0000
@@ -17,6 +17,7 @@
protocol :: Word16,
room :: String,
isMaster :: Bool,
+ isReady :: Bool,
forceQuit :: Bool
}
@@ -49,9 +50,10 @@
gamemap :: String,
gameinprogress :: Bool,
playersIn :: Int,
+ readyPlayers :: Int,
params :: Map.Map String [String]
}
-createRoom = (RoomInfo "" "" 0 [] "+rnd+" False 1 Map.empty)
+createRoom = (RoomInfo "" "" 0 [] "+rnd+" False 1 0 Map.empty)
type ClientsTransform = [ClientInfo] -> [ClientInfo]
type RoomsTransform = [RoomInfo] -> [RoomInfo]