From cc3ef2fb86dce30bf034f2e41c579cc01cbe7780 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Thu, 29 Oct 2009 18:41:18 +0000
Subject: (build_list) localize $index where really needed

---
 control-center | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/control-center b/control-center
index 3ff07327..4959d990 100755
--- a/control-center
+++ b/control-center
@@ -763,7 +763,7 @@ foreach my $notebook ($banner_notebook) {
 
 my ($_hand_cursor, $wait_cursor) = map { Gtk2::Gdk::Cursor->new($_) } qw(hand2 watch);
 
-my ($index, $left_locked) = (0, 0);
+my $left_locked = 0;
 
 #my $spacing = 25;
 
@@ -845,6 +845,7 @@ sub build_widget_element {
 }
 
 sub build_list() {
+    my $index = 0;
     load_packages2install();
     my $i;
 foreach (@tree) {
-- 
cgit v1.2.1