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

diff --git a/ChangeLog b/ChangeLog
index 6db0c02b3cf6619765a4041693895721fb058b82..1d0ae47e29a747ad933936c99f5864be67512782 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -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.

diff --git a/autoscan.in b/autoscan.in
index a64bee8434ba76d1cc0d065fd87c01dc00c5aad9..6f2a0d6e7a7a7e3c601bf8f9dc1e607181149d3a 100644 (file)
--- a/autoscan.in
+++ b/autoscan.in
@@ -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

diff --git a/autoscan.pl b/autoscan.pl
index a64bee8434ba76d1cc0d065fd87c01dc00c5aad9..6f2a0d6e7a7a7e3c601bf8f9dc1e607181149d3a 100644 (file)
--- a/autoscan.pl
+++ b/autoscan.pl
@@ -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

diff --git a/bin/autoscan.in b/bin/autoscan.in
index a64bee8434ba76d1cc0d065fd87c01dc00c5aad9..6f2a0d6e7a7a7e3c601bf8f9dc1e607181149d3a 100644 (file)
--- a/bin/autoscan.in
+++ b/bin/autoscan.in
@@ -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