diff options
author | Steve Hay <steve.m.hay@googlemail.com> | 2015-06-05 08:39:19 +0100 |
---|---|---|
committer | Steve Hay <steve.m.hay@googlemail.com> | 2015-06-05 08:39:19 +0100 |
commit | fd0a842fa0a1f8e8852881a628b7179e8ca346ce (patch) | |
tree | e9d5ab510927885e81d0cc5c5e9eee682ca29622 /cpan | |
parent | e586de20812e9f61c323eb589c4aa5f2063dca68 (diff) | |
download | perl-fd0a842fa0a1f8e8852881a628b7179e8ca346ce.tar.gz |
Upgrade Getopt-Long from version 2.45 to 2.46
Diffstat (limited to 'cpan')
-rw-r--r-- | cpan/Getopt-Long/lib/Getopt/Long.pm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/cpan/Getopt-Long/lib/Getopt/Long.pm b/cpan/Getopt-Long/lib/Getopt/Long.pm index 154c008d3a..06fa33a6ce 100644 --- a/cpan/Getopt-Long/lib/Getopt/Long.pm +++ b/cpan/Getopt-Long/lib/Getopt/Long.pm @@ -4,8 +4,8 @@ # Author : Johan Vromans # Created On : Tue Sep 11 15:00:12 1990 # Last Modified By: Johan Vromans -# Last Modified On: Mon Feb 23 20:29:11 2015 -# Update Count : 1683 +# Last Modified On: Tue Jun 2 10:40:52 2015 +# Update Count : 1685 # Status : Released ################ Module Preamble ################ @@ -17,10 +17,10 @@ use 5.004; use strict; use vars qw($VERSION); -$VERSION = 2.45; +$VERSION = 2.46; # For testing versions only. use vars qw($VERSION_STRING); -$VERSION_STRING = "2.45"; +$VERSION_STRING = "2.46"; use Exporter; use vars qw(@ISA @EXPORT @EXPORT_OK); @@ -1312,13 +1312,13 @@ sub Configure (@) { my (@options) = @_; my $prevconfig = - [ $error, $debug, $major_version, $minor_version, + [ $error, $debug, $major_version, $minor_version, $caller, $autoabbrev, $getopt_compat, $ignorecase, $bundling, $order, $gnu_compat, $passthrough, $genprefix, $auto_version, $auto_help, $longprefix, $bundling_values ]; if ( ref($options[0]) eq 'ARRAY' ) { - ( $error, $debug, $major_version, $minor_version, + ( $error, $debug, $major_version, $minor_version, $caller, $autoabbrev, $getopt_compat, $ignorecase, $bundling, $order, $gnu_compat, $passthrough, $genprefix, $auto_version, $auto_help, $longprefix, $bundling_values ) = @{shift(@options)}; |