You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by do...@hyperreal.org on 1998/11/30 14:00:53 UTC
cvs commit: modperl/t/net/perl cgi.pl.PL
dougm 98/11/30 05:00:53
Modified: t/net/perl cgi.pl.PL
Log:
remove references to the deprecated CGI::Switch
Revision Changes Path
1.3 +1 -8 modperl/t/net/perl/cgi.pl.PL
Index: cgi.pl.PL
===================================================================
RCS file: /home/cvs/modperl/t/net/perl/cgi.pl.PL,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- cgi.pl.PL 1998/01/09 17:35:05 1.2
+++ cgi.pl.PL 1998/11/30 13:00:52 1.3
@@ -1,15 +1,8 @@
use CGI ();
-use CGI::Switch ();
use strict;
-#hack for win32 because ApacheCore.dll does not export basic_http_header,
-#so CGI::Switch doesn't work, but mod_perl-win32 requires 5.004_02+ anyhow,
-#so there's no need for CGI::Switch
-
-my $class = $] >= 5.004 ? "CGI" : "CGI::Switch";
-
-my $r = $class->new;
+my $r = CGI->new;
#warn "Running cgi.pl with $CGI::VERSION";