From 6edc5cab4f79941ad3b583631bb35be478281906 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 11 Jul 2008 09:04:32 +0000 Subject: o sort the list of orphans --- NEWS | 1 + urpm/orphans.pm | 2 +- urpme | 2 +- 3 files changed, 3 insertions(+), 2 deletions(-) diff --git a/NEWS b/NEWS index 00623c01..924ffaf4 100644 --- a/NEWS +++ b/NEWS @@ -1,5 +1,6 @@ - urpme o add --justdb + o sort the list of orphans Version 6.1 - 10 July 2008, by Pascal "Pixel" Rigaux diff --git a/urpm/orphans.pm b/urpm/orphans.pm index 766154a0..f68a680d 100644 --- a/urpm/orphans.pm +++ b/urpm/orphans.pm @@ -304,7 +304,7 @@ sub get_now_orphans_msg { P("The following package is now orphan, use \"urpme --auto-orphans\" to remove it.", "The following packages are now orphans, use \"urpme --auto-orphans\" to remove them.", scalar(@orphans)) - . "\n" . add_leading_spaces(join("\n", @orphans) . "\n"); + . "\n" . add_leading_spaces(join("\n", sort @orphans) . "\n"); } #- side-effects: none diff --git a/urpme b/urpme index 2550e889..46a3ec16 100644 --- a/urpme +++ b/urpme @@ -151,7 +151,7 @@ my $msg = . sprintf(" (%s)", formatXiB(-$urpm->selected_size($state))) . ":\n" . add_leading_spaces(urpm::select::translate_why_removed($urpm, $state, @toremove_no_orphans)) . "\n" . (@orphans ? P("(orphan package)", "(orphan packages)", scalar(@orphans)) . "\n" . - add_leading_spaces(join("\n", @orphans) . "\n") : ()); + add_leading_spaces(join("\n", sort @orphans) . "\n") : ()); if ($urpm->{options}{auto}) { $test and print STDOUT $msg; -- cgit v1.2.1