codetools: fixed find declaration in library starting in initialization, bug #21832

git-svn-id: trunk@36974 -
This commit is contained in:
mattias 2012-04-22 18:25:25 +00:00
parent 28123ac857
commit f2b5e73135

View File

@ -3246,7 +3246,13 @@ begin
ContextNode:=ContextNode.FirstChild; // the ctnParameterList
end;
ctnProgram, ctnPackage, ctnLibrary, ctnUnit:
ctnProgram, ctnLibrary:
begin
if SearchInSourceName then exit;
MoveContextNodeToChildren;
end;
ctnUnit, ctnPackage:
if SearchInSourceName then exit;
ctnProperty: