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 06:21:42 UTC
svn commit: r1067393 - /httpd/apreq/trunk/glue/perl/lib/APR/Request/Magic.pm
Author: joes
Date: Sat Feb 5 05:21:42 2011
New Revision: 1067393
URL: http://svn.apache.org/viewvc?rev=1067393&view=rev
Log:
incorporate fred's comments
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=1067393&r1=1067392&r2=1067393&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 05:21:42 2011
@@ -7,12 +7,13 @@ if ($@) {
base->import("APR::Pool");
*handle = sub { APR::Request::CGI->handle(@_) };
*new = sub { bless APR::Pool->new, shift };
- return 1;
}
-require Apache2::RequestRec;
-require Apache2::RequestUtil;
-base->import("Apache2::RequestRec");
-*handle = sub { APR::Request::Apache2->handle(@_) };
-*new = sub { bless Apache2::RequestUtil->request, shift };
+else {
+ require Apache2::RequestRec;
+ require Apache2::RequestUtil;
+ base->import("Apache2::RequestRec");
+ *handle = sub { APR::Request::Apache2->handle(@_) };
+ *new = sub { bless Apache2::RequestUtil->request, shift };
+}
1;