summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps_interactive.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-03-13 13:04:18 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-03-13 13:04:18 +0000
commit21ba800aefa91802836150371f77d459ababcc69 (patch)
tree6033506be6f64fc20b9b3d1ebf2645829b9b3994 /perl-install/install_steps_interactive.pm
parent28c5fbc0567b633bdc24dcad32fabfe414791f0f (diff)
downloaddrakx-backup-do-not-use-21ba800aefa91802836150371f77d459ababcc69.tar
drakx-backup-do-not-use-21ba800aefa91802836150371f77d459ababcc69.tar.gz
drakx-backup-do-not-use-21ba800aefa91802836150371f77d459ababcc69.tar.bz2
drakx-backup-do-not-use-21ba800aefa91802836150371f77d459ababcc69.tar.xz
drakx-backup-do-not-use-21ba800aefa91802836150371f77d459ababcc69.zip
compss is deprecated. use compssUsers for the tree
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
-rw-r--r--perl-install/install_steps_interactive.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index 24a0bd235..3e47ec3c6 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -429,7 +429,7 @@ sub selectPackagesToUpgrade {
}
#------------------------------------------------------------------------------
sub choosePackages {
- my ($o, $packages, $compss, $compssUsers, $first_time) = @_;
+ my ($o, $packages, $compssUsers, $first_time) = @_;
#- this is done at the very beginning to take into account
#- selection of CD by user if using a cdrom.
@@ -492,7 +492,7 @@ sub choosePackages {
($o->{packages_}{ind}) =
pkgs::setSelectedFromCompssList($packages, $o->{compssUsersChoice}, $min_mark, $size2install);
- $o->choosePackagesTree($packages, $compss) if $individual;
+ $o->choosePackagesTree($packages) if $individual;
}
sub chooseSizeToInstall {
@@ -500,7 +500,7 @@ sub chooseSizeToInstall {
min($def, $availableC * 0.7);
}
sub choosePackagesTree {
- my ($o, $packages, $compss) = @_;
+ my ($o, $packages) = @_;
$o->ask_many_from_list('', _("Choose the packages you want to install"),
{