summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r--perl-install/install_steps.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index fe54fff48..fb75f630a 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -310,7 +310,7 @@ sub choosePackages {
#- for expert, as they may have done individual selection before.
if ($first_time || !$::expert) {
exists $o->{compssListLevel}
- and pkgs::setSelectedFromCompssList($packages, $o->{compssUsersChoice}, $o->{compssListLevel}, $availableCorrected);
+ and pkgs::setSelectedFromCompssList($packages, $o->{rpmsrate_flags_chosen}, $o->{compssListLevel}, $availableCorrected);
}
$availableCorrected;
}
@@ -598,7 +598,7 @@ sub install_urpmi {
$o->{method},
$o->{packages},
$o->{packages}{mediums});
- pkgs::saveCompssUsers($o->{prefix}, $o->{packages}, $o->{compssUsers}, $o->{compssUsersSorted});
+ pkgs::saveCompssUsers($o->{prefix}, $o->{packages}, $o->{compssUsers});
}
}
@@ -689,7 +689,7 @@ sub summary {
}
sub summaryAfter {
- my ($o) = @_;
+ my ($_o) = @_;
}
#------------------------------------------------------------------------------