--- a/hedgewars/hwengine.pas Tue May 17 23:29:49 2016 +0300
+++ b/hedgewars/hwengine.pas Fri Jul 15 22:39:07 2016 +0300
@@ -42,22 +42,6 @@
implementation
uses uFLUICallback, uFLTypes;
-// TODO localization support
-procedure ShowCredits();
-var themeCredits, mapCredits: shortstring;
-begin
- if Length(cMapName) > 0 then
- begin
- mapCredits:= read1stLn(cPathz[ptMapCurrent] + '/credits.txt');
- if Length(mapCredits) > 0 then
- AddChatString(char(#11) + '© Map: ' + mapCredits);
- end;
-
- themeCredits:= read1stLn(cPathz[ptCurrTheme] + '/credits.txt');
- if Length(themeCredits) > 0 then
- AddChatString(char(#12) + '© Theme: ' + themeCredits);
-end;
-
///////////////////////////////////////////////////////////////////////////////
function DoTimer(Lag: LongInt): boolean;
var s: shortstring;
@@ -102,7 +86,6 @@
with TeamsArray[t]^ do
MaxTeamHealth:= TeamHealth;
RecountAllTeamsHealth;
- if not cOnlyStats then ShowCredits;
GameState:= gsGame;
end;
gsConfirm, gsGame, gsChat: