paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-06 10:18:05 +02:00
Code Issues Packages Projects Releases Wiki Activity

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

Browse Source 
git-svn-id: branches/fixes_1_8@57322 -
This commit is contained in:
mattias 2018-02-17 10:45:02 +00:00
parent 357e8ee521
commit e67c6c2ac8
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/lcltranslator.pas
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