diff options
Diffstat (limited to 'urpm/select.pm')
| -rw-r--r-- | urpm/select.pm | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/urpm/select.pm b/urpm/select.pm index 608540d6..cf176b52 100644 --- a/urpm/select.pm +++ b/urpm/select.pm @@ -288,12 +288,10 @@ sub select_replacepkgs { my $db = urpm::db_open_or_die($urpm, $urpm->{root}); foreach my $id (keys %$requested) { my @pkgs = $urpm->find_candidate_packages_($id); - if (my @installed = grep { URPM::is_package_installed($db, $_) } @pkgs) { - foreach my $pkg (@installed) { + if (my ($pkg) = grep { URPM::is_package_installed($db, $_) } @pkgs) { $urpm->{debug_URPM}("selecting replacepkg " . $pkg->fullname) if $urpm->{debug_URPM}; $pkg->set_flag_requested; $state->{selected}{$pkg->id} = undef; - } } else { $urpm->{fatal}(1, N("found package(s) %s in urpmi db, but none are installed", join(', ', map { scalar($_->fullname) } @pkgs))); } |