summaryrefslogtreecommitdiffstats
path: root/perl-install/pkgs.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-11-07 13:51:08 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-11-07 13:51:08 +0000
commitfe9d92c84e2888c470a72d903b78f74288c84a9b (patch)
tree423459c1c64bc8bc92c71f799b58814717f91d17 /perl-install/pkgs.pm
parent66f14d5895e94e97d100acece1b7df23a28cafc6 (diff)
downloaddrakx-fe9d92c84e2888c470a72d903b78f74288c84a9b.tar
drakx-fe9d92c84e2888c470a72d903b78f74288c84a9b.tar.gz
drakx-fe9d92c84e2888c470a72d903b78f74288c84a9b.tar.bz2
drakx-fe9d92c84e2888c470a72d903b78f74288c84a9b.tar.xz
drakx-fe9d92c84e2888c470a72d903b78f74288c84a9b.zip
no_comment
Diffstat (limited to 'perl-install/pkgs.pm')
-rw-r--r--perl-install/pkgs.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index 53fca5a99..bb83ab3ca 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -270,7 +270,7 @@ sub setSelectedFromCompssList($$$$$$) {
my ($compssListLevels, $packages, $size, $install_class, $lang, $isUpgrade) = @_;
my ($level, $ind) = 100;
- my @packages = values %$packages;
+ my @packages = allpackages($packages);
my @places = do {
map_index { $ind = $::i if $_ eq $install_class } @{$compssListLevels};
defined $ind or log::l("unknown install class $install_class in compssList"), return;