From 8e81570b8050dda6cbf512ab3a79ef93a2d5f425 Mon Sep 17 00:00:00 2001
From: juha <juha@lazarus-ide.org>
Date: Sun, 12 Sep 2010 11:16:01 +0000
Subject: [PATCH] Converter: don't try to retype variables when there are no
 replacements.

git-svn-id: trunk@27328 -
---
 converter/missingpropertiesdlg.pas | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/converter/missingpropertiesdlg.pas b/converter/missingpropertiesdlg.pas
index a1942070a9..87e4dfdd12 100644
--- a/converter/missingpropertiesdlg.pas
+++ b/converter/missingpropertiesdlg.pas
@@ -317,9 +317,10 @@ begin
       exit;
     end;
     // Apply replacement types also to pascal source.
-    if not CodeToolBoss.RetypeClassVariables(fPascalBuffer,
+    if TypeReplacements.Tree.Count>0 then
+      if not CodeToolBoss.RetypeClassVariables(fPascalBuffer,
             TLFMObjectNode(fLFMTree.Root).TypeName, TypeReplacements, false) then
-      Result:=mrCancel;
+        Result:=mrCancel;
   finally
     TypeReplacements.Free;
     PropReplacements.Free;