diff options
author | Joey Hess <joey@gnu.kitenet.net> | 2009-03-20 21:52:36 -0400 |
---|---|---|
committer | Joey Hess <joey@gnu.kitenet.net> | 2009-03-20 21:52:36 -0400 |
commit | ce53a5276c9f3a388dce10f442c3c1659e3bccdb (patch) | |
tree | 41de5c35fe392325fb78e60993dc3203a16b2638 /Debian/Debhelper | |
parent | 259147a436a1530733a250935ff866b6c6f78621 (diff) |
fix corner case
If DH_INTERNAL_OPTIONS does not specify any packages, we don't want to
exclude them all!
Diffstat (limited to 'Debian/Debhelper')
-rw-r--r-- | Debian/Debhelper/Dh_Getopt.pm | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/Debian/Debhelper/Dh_Getopt.pm b/Debian/Debhelper/Dh_Getopt.pm index 28e4b79a..ef94e940 100644 --- a/Debian/Debhelper/Dh_Getopt.pm +++ b/Debian/Debhelper/Dh_Getopt.pm @@ -164,9 +164,11 @@ sub parseopts { # at the command line to act on a specific package, and if # nothing is specified, the excludes will cause the set of # packages DH_INTERNAL_OPTIONS specifies to be acted on. - foreach my $package (getpackages()) { - if (! grep { $_ eq $package } @{$dh{DOPACKAGES}}) { - $exclude_package{$package}=1; + if (defined $dh{DOPACKAGES}) { + foreach my $package (getpackages()) { + if (! grep { $_ eq $package } @{$dh{DOPACKAGES}}) { + $exclude_package{$package}=1; + } } } delete $dh{DOPACKAGES}; |