From 844c2556c5f24675ec90a387a2ff900f52c9e785 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Wed, 7 Dec 2011 09:25:29 +0000
Subject: [PATCH] codetools: class completion: checking for ancestor: fixed
 tool

git-svn-id: trunk@34019 -
---
 components/codetools/codecompletiontool.pas | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/components/codetools/codecompletiontool.pas b/components/codetools/codecompletiontool.pas
index e189470b0b..26797654a6 100644
--- a/components/codetools/codecompletiontool.pas
+++ b/components/codetools/codecompletiontool.pas
@@ -7052,7 +7052,8 @@ begin
     Params:=TFindDeclarationParams.Create;
     try
       ClassNode:=CodeCompleteClassNode;
-      while FindAncestorOfClass(ClassNode,Params,True) do begin
+      Tool:=Self;
+      while Tool.FindAncestorOfClass(ClassNode,Params,True) do begin
         Tool:=Params.NewCodeTool;
         ClassNode:=Params.NewNode;
         Params.ContextNode:=ClassNode;