summaryrefslogtreecommitdiffstats
path: root/urpm/orphans.pm
diff options
context:
space:
mode:
Diffstat (limited to 'urpm/orphans.pm')
-rw-r--r--urpm/orphans.pm8
1 files changed, 5 insertions, 3 deletions
diff --git a/urpm/orphans.pm b/urpm/orphans.pm
index 2ca98287..67268fce 100644
--- a/urpm/orphans.pm
+++ b/urpm/orphans.pm
@@ -359,11 +359,13 @@ sub get_now_orphans_msg {
my $orphans = get_orphans($urpm);
my @orphans = map { scalar $_->fullname } @$orphans or return '';
- P("The following package is now orphaned, if you wish to remove it, you can use \"urpme --auto-orphans\".",
- "The following packages are now orphaned, if you wish to remove them, you can use \"urpme --auto-orphans\".", scalar(@orphans))
- . "\n" . add_leading_spaces(join("\n", sort @orphans) . "\n");
+ P("The following package:\n" . add_leading_spaces(join("\n", sort @orphans) . "\n") .
+ "is now orphaned, if you wish to remove it, you can use \"urpme --auto-orphans\"",
+ "The following packages:\n" . add_leading_spaces(join("\n", sort @orphans) . "\n") .
+ "are now orphaned, if you wish to remove them, you can use \"urpme --auto-orphans\"",scalar(@orphans));
}
+
#- side-effects: none
sub add_leading_spaces {
my ($s) = @_;