summaryrefslogtreecommitdiffstats
path: root/urpme
diff options
context:
space:
mode:
Diffstat (limited to 'urpme')
-rw-r--r--urpme7
1 files changed, 4 insertions, 3 deletions
diff --git a/urpme b/urpme
index 59bea458..5abb198d 100644
--- a/urpme
+++ b/urpme
@@ -97,20 +97,21 @@ my @toremove = $urpm->find_packages_to_remove($state, \@l,
} 0 },
) or $urpm->{fatal}(0, N("Nothing to remove"));
+my $list = join "\n", $urpm->translate_why_removed($state, sort @to_remove);
if ($test && $auto) {
my $msg = N("Checking to remove the following packages");
- print STDOUT "$msg:\n" . join("\n", sort { $a cmp $b } @toremove) . "\n";
+ print STDOUT "$msg:\n$list\n";
} elsif (($parallel || @toremove > @l) && !$auto) {
my $sum = 0;
foreach (@toremove) {
$sum += $state->{rejected}{$_}{size};
}
my $msg = N("To satisfy dependencies, the following packages will be removed (%d MB)", toMb($sum));
- print STDOUT "$msg:\n" . join("\n", sort { $a cmp $b } @toremove) . "\n$askok" . N(" (Y/n) ");
+ print STDOUT "$msg:\n$list\n$askok" . N(" (Y/n) ");
<STDIN> =~ /[$noexpr]/ and exit 0;
}
-print STDOUT "\n".N("removing %s", join(' ', @toremove))."\n";
+print STDOUT "\n".N("removing %s", join(' ', sort @toremove))."\n";
@l = $parallel ?
$urpm->parallel_remove(\@toremove, test => $test, force => $force, translate_message => 1) :
$urpm->install(\@toremove, {}, {}, test => $test, force => $force, translate_message => 1);