From 7dc8614b9840346e53f135112b9fced82527dcbf Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.com>
Date: Thu, 2 Oct 2008 10:41:47 +0000
Subject: use functions to get rpmsrate levels

---
 perl-install/install/steps_interactive.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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

diff --git a/perl-install/install/steps_interactive.pm b/perl-install/install/steps_interactive.pm
index 75ae44ac7..7deee1fc4 100644
--- a/perl-install/install/steps_interactive.pm
+++ b/perl-install/install/steps_interactive.pm
@@ -403,10 +403,10 @@ sub choosePackages {
     my ($o) = @_;
 
     require pkgs;
-    add2hash_($o, { compssListLevel => $pkgs::rpmsrate_rate_default });
+    add2hash_($o, { compssListLevel => pkgs::rpmsrate_rate_default() });
 
     my $w = $o->wait_message('', N("Looking for available packages..."));
-    my $availableC = install::steps::choosePackages($o, $pkgs::rpmsrate_rate_max);
+    my $availableC = install::steps::choosePackages($o, pkgs::rpmsrate_rate_max());
 
     require install::pkgs;
 
-- 
cgit v1.2.1