From f2eefb0f5f62e4832fa2b3d65e80fb6663d01f73 Mon Sep 17 00:00:00 2001 From: Christophe Fergeau Date: Mon, 10 Aug 2009 09:44:07 +0000 Subject: improve message notifying about orphans MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit patch from François, fixes bug #42484 --- urpm/orphans.pm | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'urpm') 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) = @_; -- cgit v1.2.1