summaryrefslogtreecommitdiffstats
path: root/urpm.pm
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2002-06-10 10:04:02 +0000
committerFrancois Pons <fpons@mandriva.com>2002-06-10 10:04:02 +0000
commit66ebfb726d18f8644de6fa3dd14806e43cce11d1 (patch)
treecae87c0936d6193e458d3e31e200955f364f3642 /urpm.pm
parenta0c34ae249bca805ffc8a0575fc75dbc032157fe (diff)
downloadurpmi-66ebfb726d18f8644de6fa3dd14806e43cce11d1.tar
urpmi-66ebfb726d18f8644de6fa3dd14806e43cce11d1.tar.gz
urpmi-66ebfb726d18f8644de6fa3dd14806e43cce11d1.tar.bz2
urpmi-66ebfb726d18f8644de6fa3dd14806e43cce11d1.tar.xz
urpmi-66ebfb726d18f8644de6fa3dd14806e43cce11d1.zip
3.4-8mdk
Diffstat (limited to 'urpm.pm')
-rw-r--r--urpm.pm10
1 files changed, 5 insertions, 5 deletions
diff --git a/urpm.pm b/urpm.pm
index 6411ae84..ae13f39e 100644
--- a/urpm.pm
+++ b/urpm.pm
@@ -2004,7 +2004,7 @@ sub select_packages_to_upgrade {
if ($obsoleted > 0) {
$urpm->{log}(_("selecting %s using obsoletes", $pkg->fullname));
$obsoletedPackages{$n} = undef;
- $packages->{$pkg->id} = undef;
+ exists $packages->{$pkg->id} or $packages->{$pkg->id} = 1;
}
}
}
@@ -2022,7 +2022,7 @@ sub select_packages_to_upgrade {
if ($p->compare_pkg($pkg) >= 0) {
if ($otherPackage && $p->compare($pkg->version) <= 0) {
$toRemove{$otherPackage} = 0;
- $packages->{$pkg->id} = undef;
+ exists $packages->{$pkg->id} or $packages->{$pkg->id} = 1;
$urpm->{log}(_("removing %s to upgrade to %s ...
since it will not be updated otherwise", $otherPackage, $pkg->name.'-'.$pkg->version.'-'.$pkg->release));
} else {
@@ -2031,7 +2031,7 @@ sub select_packages_to_upgrade {
} elsif ($upgradeNeedRemove{$pkg->name}) {
my $otherPackage = $p->name.'-'.$p->version.'-'.$p->release;
$toRemove{$otherPackage} = 0;
- $packages->{$pkg->id} = undef;
+ exists $packages->{$pkg->id} or $packages->{$pkg->id} = 1;
$urpm->{log}(_("removing %s to upgrade to %s ...
since it will not upgrade correctly!", $otherPackage, $pkg->name.'-'.$pkg->version.'-'.$pkg->release));
}
@@ -2058,7 +2058,7 @@ sub select_packages_to_upgrade {
unless ($skipThis) {
my $cumulSize;
- $packages->{$pkg->id} = undef;
+ exists $packages->{$pkg->id} or $packages->{$pkg->id} = 1;
#- keep in mind installed files which are not being updated. doing this costs in
#- execution time but use less memory, else hash all installed files and unhash
@@ -2107,7 +2107,7 @@ sub select_packages_to_upgrade {
if (@deps == 0 || @deps > 0 && (grep { ! exists $packages->{$pkg->id} &&
! exists $installed{$_->{id}} } @deps) == 0) {
$urpm->{log}(_("selecting %s by selection on files", $pkg->name));
- $packages->{$pkg->id} = undef;
+ $packages->{$pkg->id} = 1;
} else {
$urpm->{log}(_("avoid selecting %s as its locales language is not already selected", $pkg->fullname));
}