Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
creatensis.pl: support for excluding packages (including their depend…
…encies)
  • Loading branch information
jef-n committed Aug 20, 2015
1 parent d7c653c commit b578fc1
Showing 1 changed file with 17 additions and 6 deletions.
23 changes: 17 additions & 6 deletions ms-windows/osgeo4w/creatensis.pl
Expand Up @@ -102,12 +102,22 @@
my %pkgs;
sub getDeps {
my ($pkg) = @_;
return if exists $pkgs{$pkg};
print " Including package $pkg\n" if $verbose;
$pkgs{$pkg} = 1;
my $pkg = shift;
my $deponly = $pkg =~ /-$/;
$pkg =~ s/-$//;
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);
Expand Down Expand Up @@ -461,4 +471,5 @@ =head1 SYNOPSIS
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

0 comments on commit b578fc1

Please sign in to comment.