summaryrefslogtreecommitdiffstats
path: root/perl-install/install/steps_interactive.pm
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.com>2008-09-23 17:48:40 +0000
committerOlivier Blin <oblin@mandriva.com>2008-09-23 17:48:40 +0000
commit1d1cc4d106e682c303b12952066bab7d74936e9e (patch)
treec942a61a4fbfc7dc7243eadfe0bed98a962a5786 /perl-install/install/steps_interactive.pm
parent81c4563f7a04f1ac8f055ab6b766927e066a3263 (diff)
downloaddrakx-backup-do-not-use-1d1cc4d106e682c303b12952066bab7d74936e9e.tar
drakx-backup-do-not-use-1d1cc4d106e682c303b12952066bab7d74936e9e.tar.gz
drakx-backup-do-not-use-1d1cc4d106e682c303b12952066bab7d74936e9e.tar.bz2
drakx-backup-do-not-use-1d1cc4d106e682c303b12952066bab7d74936e9e.tar.xz
drakx-backup-do-not-use-1d1cc4d106e682c303b12952066bab7d74936e9e.zip
use o->{compssListLevel} instead of hardcoded default rate (so that it can be customized from command line later)
Diffstat (limited to 'perl-install/install/steps_interactive.pm')
-rw-r--r--perl-install/install/steps_interactive.pm5
1 files changed, 2 insertions, 3 deletions
diff --git a/perl-install/install/steps_interactive.pm b/perl-install/install/steps_interactive.pm
index d5e8b5f65..4d3256c32 100644
--- a/perl-install/install/steps_interactive.pm
+++ b/perl-install/install/steps_interactive.pm
@@ -412,7 +412,6 @@ sub choosePackages {
install::steps::rebootNeeded($o);
}
- my $min_mark = $pkgs::rpmsrate_rate_default;
my ($individual, $chooseGroups);
if (!$o->{isUpgrade}) {
@@ -428,10 +427,10 @@ sub choosePackages {
}
chooseGroups:
- $o->chooseGroups($o->{packages}, $o->{compssUsers}, $min_mark, \$individual) if $chooseGroups;
+ $o->chooseGroups($o->{packages}, $o->{compssUsers}, $o->{compssListLevel}, \$individual) if $chooseGroups;
($o->{packages_}{ind}) =
- install::pkgs::setSelectedFromCompssList($o->{packages}, $o->{rpmsrate_flags_chosen}, $min_mark, $availableC);
+ install::pkgs::setSelectedFromCompssList($o->{packages}, $o->{rpmsrate_flags_chosen}, $o->{compssListLevel}, $availableC);
$o->choosePackagesTree($o->{packages}) or goto chooseGroups if $individual;