* autoscan.pl: Repair broken Getopt::Long use.

This commit is contained in:
Akim Demaille 2000-09-04 14:50:50 +00:00
parent d515c73727
commit 287ac9cdb8
4 changed files with 10 additions and 6 deletions

View File

@ -1,3 +1,7 @@
2000-09-04 Peter Eisentraut <peter_e@gmx.net>
* autoscan.pl: Repair broken Getopt::Long use.
2000-09-04 Akim Demaille <akim@epita.fr>
* configure.in: Bump version to 2.49b.

View File

@ -76,11 +76,11 @@ warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n";
# Process any command line arguments.
sub parse_args
{
Getopt::Long::Configure ("bundling");
Getopt::Long::config ("bundling");
Getopt::Long::GetOptions ("A|autoconf-dir|m|macrodir=s" => \$datadir,
"h|help" => \&print_usage,
"V|version" => \&print_version,
"v|verbose+" => \$verbose)
"v|verbose" => \$verbose)
or exit 1;
die "$me: too many arguments

View File

@ -76,11 +76,11 @@ warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n";
# Process any command line arguments.
sub parse_args
{
Getopt::Long::Configure ("bundling");
Getopt::Long::config ("bundling");
Getopt::Long::GetOptions ("A|autoconf-dir|m|macrodir=s" => \$datadir,
"h|help" => \&print_usage,
"V|version" => \&print_version,
"v|verbose+" => \$verbose)
"v|verbose" => \$verbose)
or exit 1;
die "$me: too many arguments

View File

@ -76,11 +76,11 @@ warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n";
# Process any command line arguments.
sub parse_args
{
Getopt::Long::Configure ("bundling");
Getopt::Long::config ("bundling");
Getopt::Long::GetOptions ("A|autoconf-dir|m|macrodir=s" => \$datadir,
"h|help" => \&print_usage,
"V|version" => \&print_version,
"v|verbose+" => \$verbose)
"v|verbose" => \$verbose)
or exit 1;
die "$me: too many arguments