From 5302a38eb5c738bbe8bd7b79f6f90a9ad24299cf Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.com>
Date: Tue, 23 Sep 2008 17:20:02 +0000
Subject: move rpmsrate values in variables

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

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

diff --git a/perl-install/install/steps.pm b/perl-install/install/steps.pm
index 3dd0682f2..53db56997 100644
--- a/perl-install/install/steps.pm
+++ b/perl-install/install/steps.pm
@@ -273,7 +273,7 @@ sub choosePackages {
     my $availableCorrected = install::pkgs::invCorrectSize($available / sqr(1024)) * sqr(1024);
     log::l(sprintf "available size %s (corrected %s)", formatXiB($available), formatXiB($availableCorrected));
 
-    add2hash_($o, { compssListLevel => 5 }) if !$::auto_install;
+    add2hash_($o, { compssListLevel => $pkgs::rpmsrate_rate_max }) if !$::auto_install;
 
     #- !! destroying user selection of packages (they may have done individual selection before)
     exists $o->{compssListLevel}
-- 
cgit v1.2.1