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

fixed searching lazarus in current dir

Browse Source 
git-svn-id: trunk@2870 -
This commit is contained in:
mattias 2002-08-18 08:55:16 +00:00
parent 42412c5b29
commit 5ec68e1898
1 changed files with 4 additions and 1 deletions

5
ide/main.pp
View File

@ -6046,7 +6046,7 @@ var
begin
ProjectDir:=Project1.ProjectDirectory;
SearchPath:=CodeToolBoss.DefineTree.GetSrcPathForDirectory(ProjectDir);
Result:=SearchFileInPath(AFilename,ProjectDir,SearchPath,';');
Result:=SearchFileInPath(AFilename,ProjectDir,SearchPath,';',[]);
end;
//------------------------------------------------------------------------------
@ -7720,6 +7720,9 @@ end.
{ =============================================================================
$Log$
Revision 1.461 2003/02/07 19:13:57 mattias
fixed searching lazarus in current dir
Revision 1.460 2003/02/07 17:49:21 mattias
added ReadAllLinks