From 45d469f6f90a11079a8f00a0d062457ca46743ef Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Fri, 8 Feb 2008 16:06:11 +0000
Subject: (extract_header) fix querying file list of installed packages
 (regression introduced in r233988 on 2008-02-06 ("fix file list of installed
 RPMS...")

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

diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm
index 8dbd11ea..36bfc244 100644
--- a/Rpmdrake/pkg.pm
+++ b/Rpmdrake/pkg.pm
@@ -106,7 +106,7 @@ sub extract_header {
     $name =~ s!\.src!!;
 
     if ($p->flag_installed && !$p->flag_upgrade) {
-        my @files = map { chomp_(to_utf8($_)) } run_rpm("rpm -ql rpm");
+        my @files = map { chomp_(to_utf8($_)) } run_rpm("rpm -ql $name");
 	add2hash($pkg, { files => [ @files ? @files : N("(none)") ],
                          changelog => format_changelog_string(to_utf8(scalar(run_rpm("rpm -q --changelog $name")))) });
     } else {
-- 
cgit v1.2.1