mirror/autoconf
2
0
Fork 0
mirror of git://git.sv.gnu.org/autoconf synced 2025-04-06 15:10:23 +08:00
Code Issues Packages Projects Releases Wiki Activity

* bin/autom4te.in (parse_args): There can be several invocations

Browse Source 
of --language now.
This commit is contained in:
Akim Demaille 2001-09-23 17:18:20 +00:00
parent 7b9068c944
commit 969517ed7b
2 changed files with 15 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ChangeLog
View File

@ -1,3 +1,8 @@
2001-09-23 Akim Demaille <akim@epita.fr>
* bin/autom4te.in (parse_args): There can be several invocations
of --language now.
2001-09-23 Akim Demaille <akim@epita.fr>
* doc/autoconf.texi (Top): Wrap in @ifnottex.

19
bin/autom4te.in
View File

@ -461,20 +461,21 @@ sub parse_args ()
# We want to look for the early options, which should not be found
# in the configuration file. Prepend to the user arguments.
# Perform this repeatedly so that we can use --language in language
# definitions.
my $language;
# definitions. Beware that there can be several --language
# invocations.
my @language;
do {
$language = undef;
@language = ();
Getopt::Long::Configure ("pass_through");
getopt ("l|language=s" => \$language);
getopt ("l|language=s" => \@language);
if ($language)
foreach (@language)
{
die "$me: unknown language: $language\n"
unless exists $language{lc $language};
unshift @ARGV, @{$language{lc $language}};
die "$me: unknown language: $_\n"
unless exists $language{lc $_};
unshift @ARGV, @{$language{lc $_}};
}
} while $language;
} while @language;
debug "arguments: @ARGV\n";