mlot/alien
1
0
Fork 0
mirror of https://github.com/Project-OSS-Revival/alien.git synced 2026-04-25 14:00:17 +00:00
Code Issues Packages Projects Releases Wiki Activity

* Extract prefixes field before extracting scripts so that

Browse Source 
RPM_INSTALL_PREFIX gets set.
This commit is contained in:
Joey Hess
2008-03-12 11:05:39 -04:00
parent ac38739a74
commit 17bcd710f7
2 changed files with 19 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
Alien/Package/Rpm.pm
View File

@@ -78,18 +78,19 @@ sub scan {
POSTUN => 'postrm', POSTUN => 'postrm',
); );
# These fields need no translation except case.
foreach (qw{name version release arch changelogtext summary
description copyright prefixes}) {
$fieldtrans{uc $_}=$_;
}
# Use --queryformat to pull out all the fields we need. # Use --queryformat to pull out all the fields we need.
foreach my $field (keys(%fieldtrans)) { foreach my $field (qw{NAME VERSION RELEASE ARCH CHANGELOGTEXT
$_=$this->runpipe(0, "LANG=C rpm -qp --queryformat \%{$field} $file"); SUMMARY DESCRIPTION COPYRIGHT PREFIXES},
keys(%fieldtrans)) {
my $value=$this->runpipe(0, "LANG=C rpm -qp --queryformat \%{$field} $file");
if (exists $fieldtrans{$field}) {
$field=$fieldtrans{$field}; $field=$fieldtrans{$field};
$_='' if $_ eq '(none)'; }
$this->$field($_); else {
$field=lc($field);
}
$value='' if $value eq '(none)';
$this->$field($value);
} }
# Get the conffiles list. # Get the conffiles list.

7
debian/changelog vendored
View File

@@ -1,3 +1,10 @@
alien (8.70) UNRELEASED; urgency=low
* Extract prefixes field before extracting scripts so that
RPM_INSTALL_PREFIX gets set.
-- Joey Hess <joeyh@debian.org> Wed, 12 Mar 2008 11:04:06 -0400
alien (8.69) unstable; urgency=low alien (8.69) unstable; urgency=low
* Alien's repository has moved from subversion to git. * Alien's repository has moved from subversion to git.