codetools: skip fpc source directory amunits

git-svn-id: trunk@22473 -
This commit is contained in:
mattias 2009-11-07 13:00:57 +00:00
parent ea159dc66b
commit f154487ab1

View File

@ -3407,6 +3407,7 @@ var
{$IFDEF VerboseFPCSrcScan}
DebugLn(['BrowseDirectory skip ',ADirPath]);
{$ENDIF}
exit;
end;
inc(ProgressID);