paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-06-19 07:08:21 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: codehelp: stop when find declaration found a place outside of code nodes

Browse Source 
git-svn-id: trunk@32166 -
This commit is contained in:
mattias 2011-09-03 08:34:46 +00:00
parent 70d3af469c
commit 0baaf1915d
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ide/codehelp.pas
View File

@ -2356,6 +2356,7 @@ begin
if (not OldCTTool.FindDeclaration(OldXYPos,[fsfSearchSourceName], if (not OldCTTool.FindDeclaration(OldXYPos,[fsfSearchSourceName],
CTTool,CTNode,XYPos,aTopLine)) CTTool,CTNode,XYPos,aTopLine))
or (CTNode=OldCTNode) or (CTNode=OldCTNode)
or (CTNode=nil)
then begin then begin
{$ifdef VerboseLazDoc} {$ifdef VerboseLazDoc}
debugln(['TCodeHelpManager.GetHTMLHint inherited not found: ',dbgs(OldXYPos)]); debugln(['TCodeHelpManager.GetHTMLHint inherited not found: ',dbgs(OldXYPos)]);