From f0e33211284ad0733e7d72f034cacab29f44d842 Mon Sep 17 00:00:00 2001
From: juha <juha@lazarus-ide.org>
Date: Fri, 23 Aug 2013 17:38:27 +0000
Subject: [PATCH] Converter: fix the default checked value for missing units
 checkboxes.

git-svn-id: trunk@42464 -
---
 converter/missingunits.pas | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/converter/missingunits.pas b/converter/missingunits.pas
index 45fdb7dff5..362fc31a56 100644
--- a/converter/missingunits.pas
+++ b/converter/missingunits.pas
@@ -92,11 +92,11 @@ var
 
   procedure AddUnitsToListBox(AMissingUnits: TStrings);
   var
-    i: Integer;
+    i, Ind: Integer;
   begin         // Add missing units to CheckListBox.
     for i:=0 to AMissingUnits.Count-1 do begin
-      UNFDialog.MissingUnitsCheckListBox.Items.Append(AMissingUnits[i]);
-      UNFDialog.MissingUnitsCheckListBox.Checked[i]:=true;
+      Ind:=UNFDialog.MissingUnitsCheckListBox.Items.Add(AMissingUnits[i]);
+      UNFDialog.MissingUnitsCheckListBox.Checked[Ind]:=true;
     end;
   end;