equal
deleted
inserted
replaced
131 serverMessage :: B.ByteString, |
131 serverMessage :: B.ByteString, |
132 serverMessageForOldVersions :: B.ByteString, |
132 serverMessageForOldVersions :: B.ByteString, |
133 latestReleaseVersion :: Word16, |
133 latestReleaseVersion :: Word16, |
134 earliestCompatibleVersion :: Word16, |
134 earliestCompatibleVersion :: Word16, |
135 listenPort :: PortNumber, |
135 listenPort :: PortNumber, |
136 nextRoomID :: Int, |
136 --nextRoomID :: Int, |
137 dbHost :: B.ByteString, |
137 dbHost :: B.ByteString, |
138 dbName :: B.ByteString, |
138 dbName :: B.ByteString, |
139 dbLogin :: B.ByteString, |
139 dbLogin :: B.ByteString, |
140 dbPassword :: B.ByteString, |
140 dbPassword :: B.ByteString, |
141 bans :: [BanInfo], |
141 bans :: [BanInfo], |
151 newServerInfo :: Chan CoreMessage -> Chan DBQuery -> Maybe Socket -> Maybe Conf -> ServerInfo |
151 newServerInfo :: Chan CoreMessage -> Chan DBQuery -> Maybe Socket -> Maybe Conf -> ServerInfo |
152 newServerInfo = |
152 newServerInfo = |
153 ServerInfo |
153 ServerInfo |
154 True |
154 True |
155 "<h2><p align=center><a href=\"http://www.hedgewars.org/\">http://www.hedgewars.org/</a></p></h2>" |
155 "<h2><p align=center><a href=\"http://www.hedgewars.org/\">http://www.hedgewars.org/</a></p></h2>" |
156 "<font color=yellow><h3 align=center>Hedgewars 0.9.16 is out! Please update.</h3><p align=center><a href=http://hedgewars.org/download.html>Download page here</a></font>" |
156 "<font color=yellow><h3 align=center>Hedgewars 0.9.17 is out! Please update.</h3><p align=center><a href=http://hedgewars.org/download.html>Download page here</a></font>" |
157 39 |
157 41 |
158 31 -- 0.9.13 |
158 43 -- 0.9.18 |
159 46631 |
159 46631 |
160 0 |
160 --0 |
161 "" |
161 "" |
162 "" |
162 "" |
163 "" |
163 "" |
164 "" |
164 "" |
165 [] |
165 [] |