diff options
Diffstat (limited to 'utils')
-rw-r--r-- | utils/h2xs.PL | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/utils/h2xs.PL b/utils/h2xs.PL index ffc343edb7..6e1f297a62 100644 --- a/utils/h2xs.PL +++ b/utils/h2xs.PL @@ -594,6 +594,7 @@ my ($opt_A, ); Getopt::Long::Configure('bundling'); +Getopt::Long::Configure('pass_through'); my %options = ( 'omit-autoload|A' => \$opt_A, @@ -707,9 +708,10 @@ my @path_h; while (my $arg = shift) { if ($arg =~ /^-l/i) { - $extralibs = "$arg @ARGV"; - last; + $extralibs .= "$arg "; + next; } + last if $extralibs; push(@path_h, $arg); } |