This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
CGI.pm broke again
authorAndreas Koenig <a.koenig@mind.de>
Thu, 17 Apr 1997 11:36:28 +0000 (13:36 +0200)
committerChip Salzenberg <chip@atlantic.net>
Thu, 17 Apr 1997 00:00:00 +0000 (00:00 +0000)
Somehow this line was lost during recent patching. It was in 2.32 but
not in 2.33 up.

p5p-msgid: 199704171136.NAA24859@anna.in-berlin.de

lib/CGI.pm

index 30ad7a7..92c875b 100644 (file)
@@ -29,7 +29,7 @@ $AUTOLOAD_DEBUG=0;
 $NPH=0;
 
 $CGI::revision = '$Id: CGI.pm,v 2.34 1997/4/7 7:23 lstein Exp $';
-$CGI::VERSION='2.3401';
+$CGI::VERSION='2.3402';
 
 # OVERRIDE THE OS HERE IF CGI.pm GUESSES WRONG
 # $OS = 'UNIX';
@@ -174,6 +174,7 @@ sub new {
     my($class,$initializer) = @_;
     my $self = {};
     bless $self,ref $class || $class || $DefaultClass;
+    $CGI::DefaultClass->_reset_globals() if $MOD_PERL;
     $initializer = to_filehandle($initializer) if $initializer;
     $self->init($initializer);
     return $self;