sharpetronics/QGIS
1
0
Fork 0
mirror of https://github.com/qgis/QGIS.git synced 2025-04-17 00:04:02 -04:00
Code Issues Packages Projects Releases Wiki Activity

creatensis.pl: support for excluding packages (including their dependencies)

Browse Source
This commit is contained in:
Juergen E. Fischer 2015-08-20 09:57:41 +02:00
parent d7c653c5ac
commit b578fc14f8
1 changed files with 15 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
ms-windows/osgeo4w/creatensis.pl
View File

@ -102,12 +102,22 @@ close F;
my %pkgs;
sub getDeps {
my ($pkg) = @_;
my $pkg = shift;
return if exists $pkgs{$pkg};
my $deponly = $pkg =~ /-$/;
$pkg =~ s/-$//;
print " Including package $pkg\n" if $verbose;
$pkgs{$pkg} = 1;
unless($deponly) {
return if exists $pkgs{$pkg};
print " Including package $pkg\n" if $verbose;
$pkgs{$pkg} = 1;
} elsif( exists $pkgs{$pkg} ) {
print " Excluding package $pkg\n" if $verbose;
delete $pkgs{$pkg};
return;
} else {
print " Including dependencies of package $pkg\n" if $verbose;
}
foreach my $p ( @{ $dep{$pkg} } ) {
getDeps($p);
@ -461,4 +471,5 @@ creatensis.pl [options] [packages...]
If no packages are given 'qgis-full' and it's dependencies will be retrieved
and packaged.
Packages with a appended '-' are excluded, but their dependencies are included.
=cut