diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2000-06-03 12:08:35 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2000-06-03 12:08:35 +0000 |
| commit | 337801868e55146ca66221654d6295d0e24b01a7 (patch) | |
| tree | 9bf0de3ebd466995f98b59cae762b08a868e96d7 /perl-install/pkgs.pm | |
| parent | f9ee79ed64ed8ad891671e9920ef945f5bd5eca5 (diff) | |
| download | drakx-337801868e55146ca66221654d6295d0e24b01a7.tar drakx-337801868e55146ca66221654d6295d0e24b01a7.tar.gz drakx-337801868e55146ca66221654d6295d0e24b01a7.tar.bz2 drakx-337801868e55146ca66221654d6295d0e24b01a7.tar.xz drakx-337801868e55146ca66221654d6295d0e24b01a7.zip | |
no_comment
Diffstat (limited to 'perl-install/pkgs.pm')
| -rw-r--r-- | perl-install/pkgs.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index 36647a872..60b856b83 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -642,7 +642,7 @@ sub setSelectedFromCompssList { my @packages = allPackages($packages); my @places = do { #- special case for /^k/ aka kde stuff - my @values = map { $_->{values}[$ind] + (packageFlagUnskip($_) && packageName($_) !~ /^k/ ? 10 : 0) } @packages; + my @values = map { $_->{values}[$ind] + (packageFlagUnskip($_) && packageName($_) !~ /^k/ ? 10 : 1) } @packages; sort { $values[$b] <=> $values[$a] } 0 .. $#packages; }; foreach (@places) { |