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 08:04:08 UTC

svn commit: r1067402 - /httpd/apreq/trunk/glue/perl/lib/APR/Request/Magic.pm

Author: joes
Date: Sat Feb  5 07:04:08 2011
New Revision: 1067402

URL: http://svn.apache.org/viewvc?rev=1067402&view=rev
Log:
MODE var

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=1067402&r1=1067401&r2=1067402&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 07:04:08 2011
@@ -8,6 +8,7 @@ if ($@) {
     base->import("APR::Pool");
     *handle = sub { APR::Request::CGI->handle(@_) };
     *new = sub { $ctx ||= bless APR::Pool->new, shift; return $ctx };
+    our $MODE = "CGI";
 }
 else {
     require Apache2::RequestRec;
@@ -15,6 +16,7 @@ else {
     base->import("Apache2::RequestRec");
     *handle = sub { APR::Request::Apache2->handle(@_) };
     *new = sub { bless Apache2::RequestUtil->request, shift };
+    our $MODE = "Apache2";
 }
 
 1;