diff options
| author | Steve Peters <steve@fisharerojo.org> | 2005-09-28 00:06:29 +0000 |
|---|---|---|
| committer | Steve Peters <steve@fisharerojo.org> | 2005-09-28 00:06:29 +0000 |
| commit | 7dc108d184319beaec63e84f17c3ede08e5e7abc (patch) | |
| tree | eb5168d0a934e3753e60d45b320dadc2bd337ae4 /lib/CGI | |
| parent | 14b1a0c4873dd26867581787ac2b4ee054e3b2a1 (diff) | |
| download | perl-7dc108d184319beaec63e84f17c3ede08e5e7abc.tar.gz | |
Upgrade to CGI-3.11, with some modifications for Pod differences in
bleadperl.
p4raw-id: //depot/perl@25626
Diffstat (limited to 'lib/CGI')
| -rw-r--r-- | lib/CGI/Changes | 10 | ||||
| -rw-r--r-- | lib/CGI/Cookie.pm | 4 |
2 files changed, 12 insertions, 2 deletions
diff --git a/lib/CGI/Changes b/lib/CGI/Changes index 467ee641ff..e4699338c0 100644 --- a/lib/CGI/Changes +++ b/lib/CGI/Changes @@ -1,3 +1,13 @@ + Version 3.11 + 1. Killed warning in CGI::Cookie about MOD_PERL_API_VERSION + 2. Fixed append() so that it works in function mode. + 3. Workaround for a bug that appears in Apache2 versions through 2.0.54 + in which SCRIPT_NAME and PATH_INFO are incorrect if the additional path_info + contains a double slash. This workaround will handle the common case of + http://mysite.com/cgi-bin/log.cgi/http://www.some.other.site/args, but will + not handle the uncommon case of a ScriptAlias directive that adds additional + path information to the end of the translated URI. + Version 3.10 1. Added Apache2::RequestIO, which is necessary for mp2 interoperability. diff --git a/lib/CGI/Cookie.pm b/lib/CGI/Cookie.pm index 164b5ecbad..0b915f0aad 100644 --- a/lib/CGI/Cookie.pm +++ b/lib/CGI/Cookie.pm @@ -13,7 +13,7 @@ package CGI::Cookie; # wish, but if you redistribute a modified version, please attach a note # listing the modifications you have made. -$CGI::Cookie::VERSION='1.25'; +$CGI::Cookie::VERSION='1.26'; use CGI::Util qw(rearrange unescape escape); use overload '""' => \&as_string, @@ -23,7 +23,7 @@ use overload '""' => \&as_string, # Turn on special checking for Doug MacEachern's modperl my $MOD_PERL = 0; if (exists $ENV{MOD_PERL}) { - if ($ENV{MOD_PERL_API_VERSION} == 2) { + if (exists $ENV{MOD_PERL_API_VERSION} && $ENV{MOD_PERL_API_VERSION} == 2) { $MOD_PERL = 2; require Apache2::RequestUtil; require APR::Table; |