From 4aa2ecefeca3b9b7580dc73106920b9c814efa6d Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 11 May 2000 15:15:45 +0000
Subject: no_comment

---
 perl-install/install_steps_gtk.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/install_steps_gtk.pm')

diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm
index b2f6f4a57..2169b8bb4 100644
--- a/perl-install/install_steps_gtk.pm
+++ b/perl-install/install_steps_gtk.pm
@@ -439,7 +439,7 @@ sub choosePackagesTree {
 	pkgs::extractHeaders($o->{prefix}, [$p], $p->{medium});
 	$p->{header} or die;
 
-	my $ind = $o->{compssListLevels}{$o->{install_class}};
+	my $ind = $o->{compssListLevels}{$o->{installClass}};
 	my $imp = translate($pkgs::compssListDesc{pkgs::packageFlagBase($p) ? 100 : round_down($p->{values}[$ind], 10)});
 
 	gtktext_insert($info_widget, $@ ? _("Bad package") :
-- 
cgit v1.2.1