Author: geoff
Date: Fri Mar 11 07:03:52 2005
New Revision: 157091

URL: http://svn.apache.org/viewcvs?view=rev&rev=157091
Log:
remove CGI.pm hacks

Modified:
    perl/modperl/branches/apache2-rename-unstable/t/conf/modperl_extra.pl

Modified: perl/modperl/branches/apache2-rename-unstable/t/conf/modperl_extra.pl
URL: 
http://svn.apache.org/viewcvs/perl/modperl/branches/apache2-rename-unstable/t/conf/modperl_extra.pl?view=diff&r1=157090&r2=157091
==============================================================================
--- perl/modperl/branches/apache2-rename-unstable/t/conf/modperl_extra.pl 
(original)
+++ perl/modperl/branches/apache2-rename-unstable/t/conf/modperl_extra.pl Fri 
Mar 11 07:03:52 2005
@@ -22,19 +22,6 @@
 
 use File::Spec::Functions qw(canonpath catdir);
 
-BEGIN {
-    ## XXX: Block of temporary hacks for Apache::compat and 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 Apache2::ServerUtil ();
 use Apache2::ServerRec ();
 use Apache2::Process ();


Reply via email to