mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-11-02 06:23:35 +01:00
codetools: fpc sources: ignore any hidden diectory
git-svn-id: trunk@47715 -
This commit is contained in:
parent
4f3dd33568
commit
a1a31b8f97
@ -1194,7 +1194,7 @@ end;
|
||||
function GatherFilesInFPCSources(Directory: string;
|
||||
const OnProgress: TDefinePoolProgress): TStringList;
|
||||
begin
|
||||
Result:=GatherFiles(Directory,'{.svn,CVS}',
|
||||
Result:=GatherFiles(Directory,'{.*,CVS}',
|
||||
'{*.pas,*.pp,*.p,*.inc,Makefile.fpc}',8,OnProgress);
|
||||
end;
|
||||
|
||||
|
||||
Loading…
Reference in New Issue
Block a user