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

Add --target=<arch> option for setting architecture.

Browse Source
This commit is contained in:
Teemu Ikonen
2014-01-17 14:37:07 +01:00
committed by Joey Hess
parent 6f5a303f3b
commit 9cb511802b
1 changed files with 11 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
alien.pl
View File

@@ -193,6 +193,10 @@ some things to mess with their permissions and owners to the degree this does,
so it defaults to off. This can only be used when converting to debian so it defaults to off. This can only be used when converting to debian
packages. packages.
=item B<--target=>I<architecture>
Force the architecture of the generated package to the given string.
=item B<-v>, B<--verbose> =item B<-v>, B<--verbose>
Be verbose: Display each command B<alien> runs in the process of converting a Be verbose: Display each command B<alien> runs in the process of converting a
@@ -330,6 +334,7 @@ Usage: alien [options] file [...]
-i, --install Install generated package. -i, --install Install generated package.
-g, --generate Generate build tree, but do not build package. -g, --generate Generate build tree, but do not build package.
-c, --scripts Include scripts in package. -c, --scripts Include scripts in package.
--target=<arch> Set architecture of the generated package.
-v, --verbose Display each command alien runs. -v, --verbose Display each command alien runs.
--veryverbose Be verbose, and also display output of run commands. --veryverbose Be verbose, and also display output of run commands.
-k, --keep-version Do not change version of generated package. -k, --keep-version Do not change version of generated package.
@@ -344,7 +349,7 @@ EOF
# Start by processing the parameters. # Start by processing the parameters.
my (%destformats, $generate, $install, $single, $scripts, $patchfile, my (%destformats, $generate, $install, $single, $scripts, $patchfile,
$nopatch, $tgzdescription, $tgzversion, $keepversion, $fixperms, $nopatch, $tgzdescription, $tgzversion, $keepversion, $fixperms,
$test, $anypatch); $test, $anypatch, $target);
my $versionbump=1; my $versionbump=1;
# Bundling is nice anyway, and it is required or Getopt::Long will confuse # Bundling is nice anyway, and it is required or Getopt::Long will confuse
@@ -366,6 +371,7 @@ GetOptions(
"patch=s" => \$patchfile, "patch=s" => \$patchfile,
"nopatch" => \$nopatch, "nopatch" => \$nopatch,
"anypatch" => \$anypatch, "anypatch" => \$anypatch,
"target=s" => \$target,
"description=s" => \$tgzdescription, "description=s" => \$tgzdescription,
"V" => \&version, "V" => \&version,
"version:s" => sub { length $_[1] ? $tgzversion=$_[1] : version() }, "version:s" => sub { length $_[1] ? $tgzversion=$_[1] : version() },
@@ -446,6 +452,10 @@ foreach my $file (@ARGV) {
die "Unknown type of package, $file.\n"; die "Unknown type of package, $file.\n";
} }
if ($target) {
$package->arch($target);
}
if (! $package->usescripts && $package->scripts) { if (! $package->usescripts && $package->scripts) {
$package->usescripts($scripts); $package->usescripts($scripts);
if (! $scripts) { if (! $scripts) {