diff options
author | Francois Pons <fpons@mandriva.com> | 2002-08-12 15:55:28 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 2002-08-12 15:55:28 +0000 |
commit | 6b4994e98d23a6926c2a2340a43125f81a22a1f2 (patch) | |
tree | 3657781553dc36ffb7dfe886723869d0878b6ab7 /perl-install | |
parent | bef63e1ee158304b8a376c10f1dbd3b3431b6054 (diff) | |
download | drakx-backup-do-not-use-6b4994e98d23a6926c2a2340a43125f81a22a1f2.tar drakx-backup-do-not-use-6b4994e98d23a6926c2a2340a43125f81a22a1f2.tar.gz drakx-backup-do-not-use-6b4994e98d23a6926c2a2340a43125f81a22a1f2.tar.bz2 drakx-backup-do-not-use-6b4994e98d23a6926c2a2340a43125f81a22a1f2.tar.xz drakx-backup-do-not-use-6b4994e98d23a6926c2a2340a43125f81a22a1f2.zip |
fixed stupid change (almost hope it was really changes).
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/pkgs.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index f2b4a4e26..4dce1e796 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -679,7 +679,7 @@ sub computeGroupSize { #- make a fast selection (but potentially erroneous). #- installed and upgrade flags must have been computed (see compute_installed_flags). my %newSelection; - unless ($p->flag_installed && !$p->flag_upgrade) { + unless ($p->flag_available) { my @l2 = ($p->id); my $id; @@ -692,7 +692,7 @@ sub computeGroupSize { my ($candidate_id, $prefer_id); foreach (keys %{$packages->{provides}{$_} || {}}) { my $ppkg = $packages->{depslist}[$_] or next; - $ppkg->flag_installed && !$p->flag_upgrade and $prefer_id = $candidate_id = undef, last; + $ppkg->flag_available and $prefer_id = $candidate_id = undef, last; exists $preferred{$ppkg->name} and $prefer_id = $_; $ppkg->name =~ /kernel-\d/ and $prefer_id ||= $_; $candidate_id = $_; |