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

cleanup

Browse Source 
git-svn-id: trunk@16778 -
This commit is contained in:
paul 2008-09-29 05:04:25 +00:00
parent 6176cdadd9
commit 7ea0dab8c9
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/translations.pas
View File

@ -861,7 +861,7 @@ end;
procedure TPOFile.UpdateItem(const Identifier: string; Original: string); procedure TPOFile.UpdateItem(const Identifier: string; Original: string);
var var
Item: TPOFileItem; Item: TPOFileItem;
p: Integer; // p: Integer;
AContext,AComment,ATranslation: string; AContext,AComment,ATranslation: string;
begin begin
if FHelperList=nil then if FHelperList=nil then