paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-18 17:19:23 +02:00
Code Issues Packages Projects Releases Wiki Activity

LazUtils: replaced hardcoded literal with constant in translations.pas

Browse Source 
git-svn-id: trunk@56988 -
This commit is contained in:
maxim 2018-01-06 15:00:32 +00:00
parent aab5d44369
commit 07343847b2
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/lazutils/translations.pas
View File

@ -884,7 +884,7 @@ var
Flags := Item.Flags; Flags := Item.Flags;
Msg[mstr] := Item.Translation; Msg[mstr] := Item.Translation;
// if old item is fuzzy, copy PreviousID too // if old item is fuzzy, copy PreviousID too
if pos('fuzzy', Item.Flags)<>0 then if pos(sFuzzyFlag, Item.Flags)<>0 then
PrevMsgID := Item.PreviousID; PrevMsgID := Item.PreviousID;
// mark newly translated item fuzzy // mark newly translated item fuzzy
SetFuzzy:=true; SetFuzzy:=true;