Author: geoff
Date: Thu Mar 17 11:41:35 2005
New Revision: 157968
URL: http://svn.apache.org/viewcvs?view=rev&rev=157968
Log:
remove CGI.pm workarounds left behind
Modified:
perl/modperl/branches/apache2-rename-unstable/ModPerl-Registry/t/conf/modperl_extra_startup.pl
Modified:
perl/modperl/branches/apache2-rename-unstable/ModPerl-Registry/t/conf/modperl_extra_startup.pl
URL:
http://svn.apache.org/viewcvs/perl/modperl/branches/apache2-rename-unstable/ModPerl-Registry/t/conf/modperl_extra_startup.pl?view=diff&r1=157967&r2=157968
==============================================================================
---
perl/modperl/branches/apache2-rename-unstable/ModPerl-Registry/t/conf/modperl_extra_startup.pl
(original)
+++
perl/modperl/branches/apache2-rename-unstable/ModPerl-Registry/t/conf/modperl_extra_startup.pl
Thu Mar 17 11:41:35 2005
@@ -7,20 +7,6 @@
use Apache2::ServerUtil ();
use Apache2::Process ();
-BEGIN {
- ## XXX: Block of temporary hacks for CGI.pm
- *Apache::request = *Apache2::request;
- *Apache::server = *Apache2::server;
-
- for (qw/Response RequestRec RequestUtil/) {
- eval qq(
- \*Apache::$_\:: = \*Apache2::$_\::;
- \$INC{"Apache/$_.pm"} = ') . __FILE__ . "';";
- die $@ if $@;
- }
-}
-
-
use DirHandle ();
my $proc = Apache2->server->process;
