FIX: NormalizeAccentedChar function

(cherry picked from commit ba08ab16cd)
This commit is contained in:
Alexander Koblov 2025-06-13 00:55:33 +03:00
commit 87de6bfa1f

View file

@ -59,6 +59,7 @@ begin
slTempoAccents := TStringList.Create;
slTempoAccentsStripped := TStringList.Create;
try
slTempoAccents.CaseSensitive := True;
ParseLineToList(cStrAccents, slTempoAccents);
ParseLineToList(cStrAccentsStripped, slTempoAccentsStripped);
@ -67,6 +68,7 @@ begin
gslAccents := TStringList.Create;
gslAccents.Assign(slTempoAccents);
gslAccents.CaseSensitive := True;
gslAccents.Sort;
gslAccentsStripped := TStringList.Create;