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 ra...@apache.org on 2005/05/13 08:41:01 UTC
svn commit: r169957 - in /httpd/apreq/trunk/glue/perl/lib/Apache2: Cookie.pm
Request.pm Upload.pm
Author: randyk
Date: Thu May 12 23:41:00 2005
New Revision: 169957
URL: http://svn.apache.org/viewcvs?rev=169957&view=rev
Log:
prop change eol-style native, and use Apache2::RequestUtil->request
Modified:
httpd/apreq/trunk/glue/perl/lib/Apache2/Cookie.pm (contents, props changed)
httpd/apreq/trunk/glue/perl/lib/Apache2/Request.pm (props changed)
httpd/apreq/trunk/glue/perl/lib/Apache2/Upload.pm (props changed)
Modified: httpd/apreq/trunk/glue/perl/lib/Apache2/Cookie.pm
URL: http://svn.apache.org/viewcvs/httpd/apreq/trunk/glue/perl/lib/Apache2/Cookie.pm?rev=169957&r1=169956&r2=169957&view=diff
==============================================================================
--- httpd/apreq/trunk/glue/perl/lib/Apache2/Cookie.pm (original)
+++ httpd/apreq/trunk/glue/perl/lib/Apache2/Cookie.pm Thu May 12 23:41:00 2005
@@ -5,6 +5,7 @@
use APR::Request::Apache2;
use APR::Request qw/encode decode/;
use Apache2::RequestRec;
+use Apache2::RequestUtil;
use overload '""' => sub { shift->as_string() }, fallback => 1;
push our @ISA, "APR::Request::Cookie";
@@ -34,8 +35,8 @@
my $req = shift;
unless (defined $req) {
my $usage = 'Usage: Apache2::Cookie->fetch($r): missing argument $r';
- $req = eval {Apache2->request} or die <<EOD;
-$usage: attempt to fetch global Apache->request failed: $@.
+ $req = eval {Apache2::RequestUtil->request} or die <<EOD;
+$usage: attempt to fetch global Apache2::RequestUtil->request failed: $@.
EOD
}
$req = APR::Request::Apache2->handle($req) unless $req->isa("APR::Request");
Propchange: httpd/apreq/trunk/glue/perl/lib/Apache2/Cookie.pm
('svn:eol' removed)
Propchange: httpd/apreq/trunk/glue/perl/lib/Apache2/Cookie.pm
------------------------------------------------------------------------------
svn:eol-style = native
Propchange: httpd/apreq/trunk/glue/perl/lib/Apache2/Request.pm
('svn:eol' removed)
Propchange: httpd/apreq/trunk/glue/perl/lib/Apache2/Request.pm
------------------------------------------------------------------------------
svn:eol-style = native
Propchange: httpd/apreq/trunk/glue/perl/lib/Apache2/Upload.pm
('svn:eol' removed)
Propchange: httpd/apreq/trunk/glue/perl/lib/Apache2/Upload.pm
------------------------------------------------------------------------------
svn:eol-style = native