hedgewars/uSound.pas
changeset 11835 8f7e28428f3e
parent 11823 0fba6cb098a1
child 11873 7db5aef27e8d
--- a/hedgewars/uSound.pas	Tue Jun 21 15:37:08 2016 -0400
+++ b/hedgewars/uSound.pas	Tue Jun 21 22:03:09 2016 +0200
@@ -581,20 +581,6 @@
     SDLCheck(Mus <> nil, 'Mix_LoadMUS_RW', false);
     WriteLnToConsole(msgOK);
 
-    // display music credits
-    s:= s + '_credits.txt';
-
-    // if per-file credits not found check general music credits file
-    if pfsExists(s) then
-        s:= read1stLn(s)
-    else if SuddenDeath and (SDMusicFN <> '') then
-        s:= readValueFromINI(SDMusicFN, '/Music/credits.txt')
-    else
-        s:= readValueFromINI(MusicFN, '/Music/credits.txt');
-
-    if Length(s) > 0 then
-        AddChatString(char(#10) + '© Music: ' + s);
-
     SDLCheck(Mix_FadeInMusic(Mus, -1, 3000) <> -1, 'Mix_FadeInMusic', false)
 end;