diff options
| author | Tassilo von Parseval <tassilo.parseval@post.rwth-aachen.de> | 2003-07-15 09:28:52 +0200 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2003-07-21 19:00:32 +0000 |
| commit | cbca5cc34abc6d8d00819c203db194f8e4b2f63b (patch) | |
| tree | d8b77ad3e3784f83955cbff96cdfeafa8dd5429c /utils | |
| parent | 98a392ecbb7845edc25cfe254ee96c1a58aa132c (diff) | |
| download | perl-cbca5cc34abc6d8d00819c203db194f8e4b2f63b.tar.gz | |
Re: [PATCH] h2xs and extra_libraries
Message-id: <20030715052852.GA494@ethan>
p4raw-id: //depot/perl@20176
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); } |