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

IDE: compiler options test: compare only ppu dates to compiler

Browse Source 
git-svn-id: trunk@30878 -
This commit is contained in:
mattias 2011-05-23 22:09:39 +00:00
parent d7a02cfb06
commit fc317c7d59
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/checkcompileropts.pas
View File

@ -600,7 +600,7 @@ begin
Node:=CfgCache.Units.Tree.FindLowest; Node:=CfgCache.Units.Tree.FindLowest;
while Node<>nil do begin while Node<>nil do begin
Item:=PStringToStringTreeItem(Node.Data); Item:=PStringToStringTreeItem(Node.Data);
if Item^.Value<>'' then if (Item^.Value<>'') and (CompareFileExt(Item^.Value,'.ppu',false)=0) then
CheckFileAge(Item^.Value); CheckFileAge(Item^.Value);
Node:=CfgCache.Units.Tree.FindSuccessor(Node); Node:=CfgCache.Units.Tree.FindSuccessor(Node);
end; end;