netserver/Miscutils.hs
changeset 1403 b8c921ed0f13
parent 1402 c164f215f7d2
child 1408 fab171a17968
--- 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]