* Changed all invocations of programs to be in posix-complient form. Ie,

no options after args, so people who set POSIX_ME_HARDER can still use
     alien.
   * Bahave better if there is no /etc/mailname.
This commit is contained in:
joey
2000-05-22 23:23:32 +00:00
parent 141d85af7a
commit 71a8666dd8
3 changed files with 16 additions and 5 deletions

View File

@@ -545,10 +545,12 @@ sub email {
return $ENV{EMAIL} if exists $ENV{EMAIL}; return $ENV{EMAIL} if exists $ENV{EMAIL};
my $login = getlogin || (getpwuid($<))[0] || $ENV{USER}; my $login = getlogin || (getpwuid($<))[0] || $ENV{USER};
open (MAILNAME,"</etc/mailname"); myt $mailname='';
my $mailname=<MAILNAME>; if (open (MAILNAME,"</etc/mailname")) {
$mailname=<MAILNAME>;
chomp $mailname; chomp $mailname;
close MAILNAME; close MAILNAME;
}
if (!$mailname) { if (!$mailname) {
$mailname=`hostname -f`; $mailname=`hostname -f`;
chomp $mailname; chomp $mailname;

View File

@@ -82,7 +82,7 @@ sub scan {
# 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 (keys(%fieldtrans)) {
$_=`LANG=C rpm -qp $file --queryformat \%{$field}`; $_=`LANG=C rpm -qp --queryformat \%{$field} $file`;
$field=$fieldtrans{$field}; $field=$fieldtrans{$field};
$_='' if $_ eq '(none)'; $_='' if $_ eq '(none)';
$this->$field($_); $this->$field($_);

9
debian/changelog vendored
View File

@@ -1,3 +1,12 @@
alien (7.3) unstable; urgency=low
* Changed all invocations of programs to be in posix-complient form. Ie,
no options after args, so people who set POSIX_ME_HARDER can still use
alien.
* Bahave better if there is no /etc/mailname.
-- Joey Hess <joeyh@debian.org> Mon, 22 May 2000 16:04:07 -0700
alien (7.2) unstable; urgency=low alien (7.2) unstable; urgency=low
* When reloating files from a rpm, run the mv command directly, * When reloating files from a rpm, run the mv command directly,