From 772c10f63e7b8cba63c448eb4ad687402c02ebb6 Mon Sep 17 00:00:00 2001
From: juha <juha@lazarus-ide.org>
Date: Sun, 12 Sep 2010 11:15:56 +0000
Subject: [PATCH] Converter: Allow class definition in implementation section.

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

diff --git a/converter/convcodetool.pas b/converter/convcodetool.pas
index b09efef5c9..612b02cfe1 100755
--- a/converter/convcodetool.pas
+++ b/converter/convcodetool.pas
@@ -1145,7 +1145,7 @@ var
     if LookupRootTypeName='' then exit;
 
     // find root type
-    RootClassNode:=fCodeTool.FindClassNodeInInterface(LookupRootTypeName,true,false,false);
+    RootClassNode:=fCodeTool.FindClassNodeInUnit(LookupRootTypeName,true,false,false,false);
     RootContext:=CleanFindContext;
     RootContext.Node:=RootClassNode;
     RootContext.Tool:=fCodeTool;