From 3c8631f8fd53028ad93de0d06da6536e69b01c02 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 12 Mar 2008 11:10:09 -0400 Subject: [PATCH] don't try to modify a constant value --- Alien/Package/Rpm.pm | 7 ++++--- debian/changelog | 4 ++-- 2 files changed, 6 insertions(+), 5 deletions(-) diff --git a/Alien/Package/Rpm.pm b/Alien/Package/Rpm.pm index ac9dbdd..9f0e93d 100644 --- a/Alien/Package/Rpm.pm +++ b/Alien/Package/Rpm.pm @@ -83,14 +83,15 @@ sub scan { SUMMARY DESCRIPTION COPYRIGHT PREFIXES}, keys(%fieldtrans)) { my $value=$this->runpipe(0, "LANG=C rpm -qp --queryformat \%{$field} $file"); + my $key; if (exists $fieldtrans{$field}) { - $field=$fieldtrans{$field}; + $key=$fieldtrans{$field}; } else { - $field=lc($field); + $key=lc($field); } $value='' if $value eq '(none)'; - $this->$field($value); + $this->$key($value); } # Get the conffiles list. diff --git a/debian/changelog b/debian/changelog index 709cae8..27d47fb 100644 --- a/debian/changelog +++ b/debian/changelog @@ -1,9 +1,9 @@ -alien (8.70) UNRELEASED; urgency=low +alien (8.70) unstable; urgency=low * Extract prefixes field before extracting scripts so that RPM_INSTALL_PREFIX gets set. - -- Joey Hess Wed, 12 Mar 2008 11:04:06 -0400 + -- Joey Hess Wed, 12 Mar 2008 11:05:40 -0400 alien (8.69) unstable; urgency=low