aboutsummaryrefslogtreecommitdiffstats
path: root/Rpmdrake/gui.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Rpmdrake/gui.pm')
-rw-r--r--Rpmdrake/gui.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/Rpmdrake/gui.pm b/Rpmdrake/gui.pm
index 706c16df..58990d6a 100644
--- a/Rpmdrake/gui.pm
+++ b/Rpmdrake/gui.pm
@@ -857,7 +857,8 @@ or you already installed all of them."));
by_leaves => sub {
# inlining part of MDK::Common::Data::difference2():
my %l; @l{map { $_->[0] } @_} = ();
- my $pkgs_times = 'rpm -q --qf "%{name}-%{version}-%{release}.%{arch} %{installtime}\n" `urpmi_rpm-find-leaves`';
+ my $pkgs_times = join(' ', 'rpm -q --qf "%{name}-%{version}-%{release}.%{arch} %{installtime}\n"',
+ map { chomp_($_) } run_program::get_stdout('urpmi_rpm-find-leaves'));
sort { $b->[1] <=> $a->[1] } grep { exists $l{$_->[0]} } map { chomp; [ split ] } run_rpm($pkgs_times);
},
flat => sub { no locale; sort { uc($a->[0]) cmp uc($b->[0]) } @_ },