diff options
-rwxr-xr-x | rpmdrake | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -428,8 +428,8 @@ or you already installed all of them.")); by_selection => sub { sort { $pkgs->{$b->[0]}{selected} <=> $pkgs->{$a->[0]}{selected} || uc($a->[0]) cmp uc($b->[0]) } @_ }, by_leaves => sub { -# my @pkgs_times = qx{rpm -q --qf "%{name}-%{version}-%{release} %{installtime}\n" `urpmi_rpm-find-leaves`}; - sort { $b->[1] <=> $a->[1] } grep { exists $pkgs->{$_->[0]} } map { [ split ] } @pkgs_times; + my $pkgs_times = 'rpm -q --qf "%{name}-%{version}-%{release} %{installtime}\n" `urpmi_rpm-find-leaves`'; + sort { $b->[1] <=> $a->[1] } grep { exists $pkgs->{$_->[0]} } map { [ split ] } `$pkgs_times`; }, flat => sub { sort { uc($a->[0]) cmp uc($b->[0]) } @_ }); if ($flat) { |