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

* Made more robust in the face of empty rpms. Closes: #138969

Browse Source
This commit is contained in:
joey
2002-03-24 02:35:58 +00:00
parent 3a424548a2
commit da98291614
5 changed files with 28 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
Alien/Package/Rpm.pm
View File

@@ -88,12 +88,18 @@ sub scan {
}
# Get the conffiles list.
$this->conffiles([map { chomp; $_ } `rpm -qcp $file`]);
$this->conffiles([map { chomp; $_ } `LANG=C rpm -qcp $file`]);
if ($this->conffiles->[0] eq '(contains no files)') {
$this->conffiles([]);
}
$this->binary_info(scalar `rpm -qpi $file`);
# Get the filelist.
$this->filelist([map { chomp; $_ } `rpm -qpl $file`]);
$this->filelist([map { chomp; $_ } `LANG=C rpm -qpl $file`]);
if ($this->filelist->[0] eq '(contains no files)') {
$this->filelist([]);
}
# Sanity check and sanitize fields.
unless (defined $this->summary) {
@@ -246,7 +252,8 @@ sub prep {
print OUT "Name: ".$this->name."\n";
print OUT "Version: ".$this->version."\n";
print OUT "Release: ".$this->release."\n";
print OUT "Requires: ".$this->depends."\n" if length $this->depends;
print OUT "Requires: ".$this->depends."\n"
if defined $this->depends && length $this->depends;
print OUT "Summary: ".$this->summary."\n";
print OUT "Copyright: ".$this->copyright."\n";
print OUT "Distribution: ".$this->distribution."\n";
@@ -283,7 +290,7 @@ sub prep {
print OUT "(Converted from a ".$this->origformat." package by alien.)\n";
print OUT "\n";
print OUT "%files\n";
print OUT $filelist;
print OUT $filelist if defined $filelist;
close OUT;
}