diff options
| -rwxr-xr-x | gurpmi2 | 2 | ||||
| -rw-r--r-- | urpm/select.pm | 4 | ||||
| -rwxr-xr-x | urpmi | 2 |
3 files changed, 4 insertions, 4 deletions
@@ -106,7 +106,7 @@ my $restart_itself = urpm::select::resolve_dependencies($urpm, auto_select => $::auto_select, priority_upgrade => $urpm->{options}{'priority-upgrade'}, ); -my @ask_unselect = urpm::select::unselected_packages($urpm, $state); +my @ask_unselect = urpm::select::unselected_packages($state); # If there are some unselected packages, designate that we are going to return nonzero code. if (@ask_unselect) { diff --git a/urpm/select.pm b/urpm/select.pm index 96d5801a..67fe6546 100644 --- a/urpm/select.pm +++ b/urpm/select.pm @@ -572,14 +572,14 @@ sub _prohibit_packages_that_would_be_removed { } -=item unselected_packages(undef, $state) +=item unselected_packages($state) misc functions to help finding ask_unselect and ask_remove elements with their reasons translated. =cut sub unselected_packages { - my (undef, $state) = @_; + my ($state) = @_; grep { $state->{rejected}{$_}{backtrack} } keys %{$state->{rejected} || {}}; } @@ -502,7 +502,7 @@ that are older than the installed ones:\n%s", $list); $urpm::postponed_code = 17; } -my @ask_unselect = urpm::select::unselected_packages($urpm, $state); +my @ask_unselect = urpm::select::unselected_packages($state); if (@ask_unselect) { my $list = urpm::select::translate_why_unselected($urpm, $state, @ask_unselect); my $msg = @ask_unselect == 1 ? |