my $array=shift;
my %params=@_;
+ if (! exists $params{bundling} || $params{bundling}) {
+ Getopt::Long::config("bundling");
+ }
+
my @test;
my %options=(
"v" => \$dh{VERBOSE},
@ARGV=@{$dh{ARGV}} if exists $dh{ARGV};
}
-sub import {
- # Enable bundling of short command line options.
- Getopt::Long::config("bundling");
-}
-
1
+debhelper (7.4.14) unstable; urgency=low
+
+ * dh: Disable option bundling to avoid mis-parsing bundled options such
+ as "-Bpython-support". Closes: #570039
+
+ -- Joey Hess <joeyh@debian.org> Tue, 16 Feb 2010 14:47:10 -0500
+
debhelper (7.4.13) unstable; urgency=low
* dh_compress: Avoid compressing images in /usr/share/info. Closes: #567586
# Disable complaints about unknown options; they are passed on the
# debhelper commands.
ignore_unknown_options => 1,
+ # Bundling does not work well since there are unknown options.
+ bundling => 0,
);
inhibit_log();