lcl: translations: fixed getting duplicate msg from .mo file, issue #33173

git-svn-id: trunk@57321 -
This commit is contained in:
mattias 2018-02-17 10:44:33 +00:00
parent 0b8beb57af
commit a7d82ae9eb

View File

@ -307,7 +307,7 @@ begin
Result := Instance.ClassName + '.' + PropInfo^.Name;
end else if (Sender is TUpdateTranslator) then
Result := TUpdateTranslator(Sender).FStackPath + '.' + PropInfo^.Name;
Result := UpperCase(Result);
Result := LowerCase(Result); // GetText requires same case as in .po file, which is lowercase
end;
var