From 09a50476dcba36057e7ee36927ae7429d6997461 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Wed, 15 Feb 2012 19:31:30 +0000
Subject: (get_installed_packages) no need to call urpm_name() twice on each
 package

---
 Rpmdrake/pkg.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Rpmdrake')

diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm
index 40e96d61..32811092 100644
--- a/Rpmdrake/pkg.pm
+++ b/Rpmdrake/pkg.pm
@@ -336,7 +336,7 @@ sub get_installed_packages {
                       my $fullname = urpm_name($pkg);
                       return if $fullname =~ /@/;
                       $all_pkgs->{$fullname} = {
-                          selected => 0, pkg => $pkg, urpm_name => urpm_name($pkg),
+                          selected => 0, pkg => $pkg, urpm_name => $fullname,
                       } if !($all_pkgs->{$fullname} && $all_pkgs->{$fullname}{description});
                       if (my $name = $base{$fullname}) {
                           $all_pkgs->{$fullname}{base} = \$name;
-- 
cgit v1.2.1