summaryrefslogtreecommitdiffstats
path: root/perl-install/pkgs.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-01-10 02:00:46 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-01-10 02:00:46 +0000
commit4fe837d51fcc99ac6d1e80463b5e13520b250839 (patch)
treeb0c87fc4611a55f95d8812e1afbcef3475459740 /perl-install/pkgs.pm
parent88d708135221a9b0147c08169fc03e20db45c113 (diff)
downloaddrakx-backup-do-not-use-4fe837d51fcc99ac6d1e80463b5e13520b250839.tar
drakx-backup-do-not-use-4fe837d51fcc99ac6d1e80463b5e13520b250839.tar.gz
drakx-backup-do-not-use-4fe837d51fcc99ac6d1e80463b5e13520b250839.tar.bz2
drakx-backup-do-not-use-4fe837d51fcc99ac6d1e80463b5e13520b250839.tar.xz
drakx-backup-do-not-use-4fe837d51fcc99ac6d1e80463b5e13520b250839.zip
no_comment
Diffstat (limited to 'perl-install/pkgs.pm')
-rw-r--r--perl-install/pkgs.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index 91d81921c..4285ec229 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -313,7 +313,8 @@ sub setSelectedFromCompssList {
map_index { $ind = $::i if $_ eq $install_class } @$compssListLevels;
defined $ind or log::l("unknown install class $install_class in compssList"), return;
- my @values = map { $_->{values}[$ind] + ($_->{unskip} ? 10 : 0) } @packages;
+ #- special case for /^k/ aka kde stuff
+ my @values = map { $_->{values}[$ind] + ($_->{unskip} && $_->{name} !~ /^k/ ? 10 : 0) } @packages;
sort { $values[$b] <=> $values[$a] } 0 .. $#packages;
};
foreach (@places) {