netserver/Miscutils.hs
changeset 1383 d20e6e8928e3
parent 1382 b6ab9fea22fe
child 1391 735f6d43780b
--- a/netserver/Miscutils.hs	Mon Oct 20 12:58:16 2008 +0000
+++ b/netserver/Miscutils.hs	Mon Oct 20 15:59:05 2008 +0000
@@ -51,13 +51,6 @@
 	}
 createRoom = (RoomInfo "" "" 0 [] "+rnd+" False Map.empty)
 
-data GlobalInfo =
-	GlobalInfo
-	{
-		isDedicated :: Bool,
-		serverMessage :: String
-	}
-
 type ClientsTransform = [ClientInfo] -> [ClientInfo]
 type RoomsTransform = [RoomInfo] -> [RoomInfo]
 type HandlesSelector = ClientInfo -> [ClientInfo] -> [RoomInfo] -> [Handle]