IDE: check inter pkg sources: add .ppu files to list always as units even if only in include paths

git-svn-id: trunk@49122 -
This commit is contained in:
mattias 2015-05-20 20:51:23 +00:00
parent 336bdda458
commit 43cda43add

View File

@ -614,7 +614,7 @@ var
end;
procedure CollectFilesInDir(OwnerInfo: TPGInterPkgOwnerInfo; Dir: string;
var SearchedDirs: string; IsIncDir: boolean);
var SearchedDirs: string; {%H-}IsIncDir: boolean);
var
Files: TStrings;
aFilename: String;
@ -641,7 +641,6 @@ var
AnUnitName:='';
case Ext of
'.ppu','.o','.rst','.rsj','.pas','.pp','.p':
if not IsIncDir then
begin
AnUnitName:=ExtractFileNameOnly(aFilename);
if not IsDottedIdentifier(AnUnitName) then continue;