diff options
Diffstat (limited to 'Debian/Debhelper/Dh_Lib.pm')
-rw-r--r-- | Debian/Debhelper/Dh_Lib.pm | 4 |
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. |