From e53f752fe720c1d86806ab07ebc09d0d51b46e1b Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 3 Jul 2008 12:41:13 +0000
Subject: simplify

---
 rpm-find-leaves | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

(limited to 'rpm-find-leaves')

diff --git a/rpm-find-leaves b/rpm-find-leaves
index 8ce66809..12703fca 100644
--- a/rpm-find-leaves
+++ b/rpm-find-leaves
@@ -45,9 +45,7 @@ my $discard = $options{restrict_group} && sub { $_[0]->group !~ /\Q$options{grou
 my $leaves = urpm::select::installed_leaves($urpm, $discard);
 
 if ($options{fullname}) {
-    foreach my $k (sort keys %$leaves) {
-	print scalar($leaves->{$k}->fullname), "\n";
-    }
+    print "$_\n" foreach sort map { scalar $_->fullname } values %$leaves;
 } else {
     print "$_\n" foreach sort keys %$leaves;
 }
-- 
cgit v1.2.1