sync with rpm4 branch: s/redhat/altlinux/g
This commit is contained in:
parent
9663c1d7b8
commit
742a5b597d
@ -10,7 +10,7 @@ my $MainDir = '/tmp/cpan';
|
||||
|
||||
# set default options, then get options
|
||||
my %options=();
|
||||
$options{'email'}=(getpwuid($<))[0] . "\@redhat.com" ;
|
||||
$options{'email'}=(getpwuid($<))[0] . "\@altlinux.com" ;
|
||||
GetOptions(\%options, "email=s", "n=s", "create") || exit 1;
|
||||
|
||||
my $InputFile = $ARGV[0];
|
||||
|
@ -19,7 +19,7 @@ die_usage() unless $fullname;
|
||||
|
||||
my $tarball = basename($fullname);
|
||||
my $create = $options{create} || '';
|
||||
my $email = $options{email} || (getpwuid($<))[0] . '@redhat.com';
|
||||
my $email = $options{email} || (getpwuid($<))[0] . '@altlinux.com';
|
||||
my $outdir = $options{outdir} || './';
|
||||
my $tmpdir = $options{tmpdir} || '/tmp';
|
||||
my $noarch = $options{noarch};
|
||||
|
Loading…
x
Reference in New Issue
Block a user