From: Stas'M <x86corez@gmail.com>
Date: Fri, 12 Jan 2018 21:49:35 +0000 (+0300)
Subject: Fix previous commit (use toLowerCase1251)
X-Git-Url: http://deadsoftware.ru/gitweb?a=commitdiff_plain;h=19cdfaaadbe46bfae0fb4a7b397c87558f58202f;p=d2df-sdl.git

Fix previous commit (use toLowerCase1251)
---

diff --git a/src/game/g_game.pas b/src/game/g_game.pas
index 6d5717c..b1f5f9f 100644
--- a/src/game/g_game.pas
+++ b/src/game/g_game.pas
@@ -2091,7 +2091,7 @@ begin
     gChatSounds[i].Sound.SetByName('SOUND_CHAT_MACRO' + IntToStr(i));
     SetLength(gChatSounds[i].Tags, tags);
     for j := 0 to tags - 1 do
-      gChatSounds[i].Tags[j] := AnsiLowerCase(cfg.ReadStr(IntToStr(i), 'Tag' + IntToStr(j), ''));
+      gChatSounds[i].Tags[j] := toLowerCase1251(cfg.ReadStr(IntToStr(i), 'Tag' + IntToStr(j), ''));
     gChatSounds[i].FullWord := cfg.ReadBool(IntToStr(i), 'FullWord', False);
   end;
 
@@ -6981,7 +6981,7 @@ begin
     // remove player name
     Delete(Text, 1, Pos(': ', Text) + 2 - 1);
     // for FullWord check
-    Text := AnsiLowerCase(' ' + Text + ' ');
+    Text := toLowerCase1251(' ' + Text + ' ');
     fpText := FilterPunctuation(Text);
 
     for i := 0 to Length(gChatSounds) - 1 do