You are viewing a plain text version of this content. The canonical link for it is here.
Posted to apreq-cvs@httpd.apache.org by jo...@apache.org on 2011/02/05 19:39:06 UTC
svn commit: r1067479 - /httpd/apreq/trunk/glue/perl/lib/APR/Request/Magic.pm
Author: joes
Date: Sat Feb 5 18:39:05 2011
New Revision: 1067479
URL: http://svn.apache.org/viewvc?rev=1067479&view=rev
Log:
base handles this for us
Modified:
httpd/apreq/trunk/glue/perl/lib/APR/Request/Magic.pm
Modified: httpd/apreq/trunk/glue/perl/lib/APR/Request/Magic.pm
URL: http://svn.apache.org/viewvc/httpd/apreq/trunk/glue/perl/lib/APR/Request/Magic.pm?rev=1067479&r1=1067478&r2=1067479&view=diff
==============================================================================
--- httpd/apreq/trunk/glue/perl/lib/APR/Request/Magic.pm (original)
+++ httpd/apreq/trunk/glue/perl/lib/APR/Request/Magic.pm Sat Feb 5 18:39:05 2011
@@ -4,13 +4,11 @@ my $ctx;
eval { local $ENV{PERL_DL_NONLAZY} = 1; require APR::Request::Apache2; };
if ($@) {
require APR::Request::CGI;
- require APR::Pool;
base->import("APR::Pool");
*handle = sub { $ctx ||= bless APR::Pool->new; APR::Request::CGI->handle($ctx, @_) };
our $MODE = "CGI";
}
else {
- require Apache2::RequestRec;
require Apache2::RequestUtil;
base->import("Apache2::RequestRec");
*handle = sub { APR::Request::Apache2->handle(Apache2::RequestUtil->request, @_) };