mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-23 20:59:36 +02:00
IDE: comment
git-svn-id: trunk@54069 -
This commit is contained in:
parent
0b272c3409
commit
e5eb17948e
@ -1227,6 +1227,8 @@ begin
|
||||
end;
|
||||
|
||||
// check if symlink and ask user if the real file should be opened instead
|
||||
// Note that compiler never resolves symlinks, so files in the compiler
|
||||
// search path must not be resolved.
|
||||
if FilenameIsAbsolute(FFileName) then begin
|
||||
s:=CodeToolBoss.GetCompleteSrcPathForDirectory('');
|
||||
if SearchDirectoryInSearchPath(s,ExtractFilePath(FFileName))<1 then
|
||||
|
Loading…
Reference in New Issue
Block a user