diff options
Diffstat (limited to 'perl-install/install')
| -rw-r--r-- | perl-install/install/steps.pm | 2 | ||||
| -rw-r--r-- | perl-install/install/steps_gtk.pm | 2 | ||||
| -rw-r--r-- | perl-install/install/steps_interactive.pm | 2 |
3 files changed, 3 insertions, 3 deletions
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} diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm index 136c49dee..75002e07f 100644 --- a/perl-install/install/steps_gtk.pm +++ b/perl-install/install/steps_gtk.pm @@ -494,7 +494,7 @@ sub choosePackagesTree { code => sub { install::any::unselectMostPackages($o); - install::pkgs::setSelectedFromCompssList($packages, { SYSTEM => 1 }, 4, $availableCorrected); + install::pkgs::setSelectedFromCompssList($packages, { SYSTEM => 1 }, $pkgs::rpmsrate_rate_default, $availableCorrected); 1; } }), ], diff --git a/perl-install/install/steps_interactive.pm b/perl-install/install/steps_interactive.pm index e3640bddb..4729a717a 100644 --- a/perl-install/install/steps_interactive.pm +++ b/perl-install/install/steps_interactive.pm @@ -417,7 +417,7 @@ sub choosePackages { install::steps::rebootNeeded($o); } - my $min_mark = 4; + my $min_mark = $pkgs::rpmsrate_rate_default; my ($individual, $chooseGroups); if (!$o->{isUpgrade}) { |