aboutsummaryrefslogtreecommitdiffstats
path: root/Rpmdrake/pkg.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2008-02-04 13:20:35 +0000
committerThierry Vignaud <tv@mandriva.org>2008-02-04 13:20:35 +0000
commiteebc655cff14366482025954bf2861ef6ef587f6 (patch)
treed42ffed8bbe71fdcf24f44c159889826abf6caae /Rpmdrake/pkg.pm
parentd81f0c251e8c4cd1322fcd1cb9ca8ad1d33dc7c8 (diff)
downloadrpmdrake-eebc655cff14366482025954bf2861ef6ef587f6.tar
rpmdrake-eebc655cff14366482025954bf2861ef6ef587f6.tar.gz
rpmdrake-eebc655cff14366482025954bf2861ef6ef587f6.tar.bz2
rpmdrake-eebc655cff14366482025954bf2861ef6ef587f6.tar.xz
rpmdrake-eebc655cff14366482025954bf2861ef6ef587f6.zip
(extract_header) do not include architecture in SRPM names, thus fixing
extracting info for SRPMS and RPM GPG keys
Diffstat (limited to 'Rpmdrake/pkg.pm')
-rw-r--r--Rpmdrake/pkg.pm3
1 files changed, 3 insertions, 0 deletions
diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm
index 0ba57602..28907b6f 100644
--- a/Rpmdrake/pkg.pm
+++ b/Rpmdrake/pkg.pm
@@ -98,6 +98,9 @@ sub extract_header {
[ map { [ "$spacing$_\n", if_(/^\*/, { 'weight' => Gtk2::Pango->PANGO_WEIGHT_BOLD }) ] } split("\n", $_[0]) ];
};
my $name = urpm_name($pkg->{pkg});
+ # fix extracting info for SRPMS and RPM GPG keys:
+ $name =~ s!\.src!!;
+
if ($pkg->{pkg}->flag_installed && !$pkg->{pkg}->flag_upgrade) {
add2hash($pkg, { files => [ split /\n/, chomp_(scalar(run_rpm("rpm -ql $name"))) || N("(none)") ],
changelog => $chg_prepro->(to_utf8(scalar(run_rpm("rpm -q --changelog $name")))) });