From 017b48771a2dfbd95654c659cdfb1f62e34f944c Mon Sep 17 00:00:00 2001
From: juha <juha@lazarus-ide.org>
Date: Sun, 12 Sep 2010 11:15:52 +0000
Subject: [PATCH] Converter: support class defintion in implementation section.

git-svn-id: trunk@27326 -
---
 converter/convcodetool.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/converter/convcodetool.pas b/converter/convcodetool.pas
index 00dc97e1eb..b09efef5c9 100755
--- a/converter/convcodetool.pas
+++ b/converter/convcodetool.pas
@@ -432,7 +432,7 @@ begin
   with fCodeTool do begin
     BuildTree(true);
     // Find the class name that the main class inherits from.
-    ANode:=FindClassNodeInInterface(AClassName,true,false,false);
+    ANode:=FindClassNodeInUnit(AClassName,true,false,false,false);
     if ANode=nil then exit;
     BuildSubTreeForClass(ANode);
     InheritanceNode:=FindInheritanceNode(ANode);