equal
deleted
inserted
replaced
128 { |
128 { |
129 isDedicated :: Bool, |
129 isDedicated :: Bool, |
130 serverMessage :: B.ByteString, |
130 serverMessage :: B.ByteString, |
131 serverMessageForOldVersions :: B.ByteString, |
131 serverMessageForOldVersions :: B.ByteString, |
132 latestReleaseVersion :: Word16, |
132 latestReleaseVersion :: Word16, |
|
133 earliestCompatibleVersion :: Word16, |
133 listenPort :: PortNumber, |
134 listenPort :: PortNumber, |
134 nextRoomID :: Int, |
135 nextRoomID :: Int, |
135 dbHost :: B.ByteString, |
136 dbHost :: B.ByteString, |
136 dbName :: B.ByteString, |
137 dbName :: B.ByteString, |
137 dbLogin :: B.ByteString, |
138 dbLogin :: B.ByteString, |
149 newServerInfo :: Chan CoreMessage -> Chan DBQuery -> Maybe c -> ServerInfo c |
150 newServerInfo :: Chan CoreMessage -> Chan DBQuery -> Maybe c -> ServerInfo c |
150 newServerInfo = |
151 newServerInfo = |
151 ServerInfo |
152 ServerInfo |
152 True |
153 True |
153 "<h2><p align=center><a href=\"http://www.hedgewars.org/\">http://www.hedgewars.org/</a></p></h2>" |
154 "<h2><p align=center><a href=\"http://www.hedgewars.org/\">http://www.hedgewars.org/</a></p></h2>" |
154 "<font color=yellow><h3 align=center>Hedgewars 0.9.14.1 is out! Please update.</h3><p align=center><a href=http://hedgewars.org/download.html>Download page here</a></font>" |
155 "<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>" |
155 35 |
156 39 |
|
157 31 -- 0.9.13 |
156 46631 |
158 46631 |
157 0 |
159 0 |
158 "" |
160 "" |
159 "" |
161 "" |
160 "" |
162 "" |