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;