summaryrefslogtreecommitdiff
path: root/Debian/Debhelper/Dh_Lib.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Debian/Debhelper/Dh_Lib.pm')
-rw-r--r--Debian/Debhelper/Dh_Lib.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/Debian/Debhelper/Dh_Lib.pm b/Debian/Debhelper/Dh_Lib.pm
index 6be25f9d..82efc5be 100644
--- a/Debian/Debhelper/Dh_Lib.pm
+++ b/Debian/Debhelper/Dh_Lib.pm
@@ -20,6 +20,8 @@ use vars qw(@ISA @EXPORT %dh);
my $max_compat=7;
sub init {
+ my %params=@_;
+
# If DH_OPTIONS is set, prepend it @ARGV.
if (defined($ENV{DH_OPTIONS})) {
# Ignore leading/trailing whitespace.
@@ -42,7 +44,7 @@ sub init {
if ($parseopt) {
eval "use Debian::Debhelper::Dh_Getopt";
error($!) if $@;
- %dh=Debian::Debhelper::Dh_Getopt::parseopts();
+ Debian::Debhelper::Dh_Getopt::parseopts($params{options});
}
# Another way to set excludes.