Author: joes
Date: Wed Apr 27 11:06:21 2005
New Revision: 165021
URL: http://svn.apache.org/viewcvs?rev=165021&view=rev
Log:
Add version strings to modules in /lib.
Modified:
httpd/apreq/trunk/glue/perl/lib/Apache2/Cookie.pm
httpd/apreq/trunk/glue/perl/lib/Apache2/Request.pm
httpd/apreq/trunk/glue/perl/lib/Apache2/Upload.pm
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=165021&r1=165020&r2=165021&view=diff
==============================================================================
--- httpd/apreq/trunk/glue/perl/lib/Apache2/Cookie.pm (original)
+++ httpd/apreq/trunk/glue/perl/lib/Apache2/Cookie.pm Wed Apr 27 11:06:21 2005
@@ -8,6 +8,7 @@
use overload '""' => sub { shift->as_string() }, fallback => 1;
push our @ISA, "APR::Request::Cookie";
+our $VERSION = "2.05-dev";
sub new {
my ($class, $r, %attrs) = @_;
Modified: httpd/apreq/trunk/glue/perl/lib/Apache2/Request.pm
URL:
http://svn.apache.org/viewcvs/httpd/apreq/trunk/glue/perl/lib/Apache2/Request.pm?rev=165021&r1=165020&r2=165021&view=diff
==============================================================================
--- httpd/apreq/trunk/glue/perl/lib/Apache2/Request.pm (original)
+++ httpd/apreq/trunk/glue/perl/lib/Apache2/Request.pm Wed Apr 27 11:06:21 2005
@@ -3,6 +3,7 @@
use APR::Request::Apache2 qw/args/; # XXX the args() override here is a bug.
use Apache2::RequestRec;
push our @ISA, qw/Apache2::RequestRec APR::Request::Apache2/;
+our $VERSION = "2.05-dev";
my %old_limits = (
post_max => "read_limit",
Modified: httpd/apreq/trunk/glue/perl/lib/Apache2/Upload.pm
URL:
http://svn.apache.org/viewcvs/httpd/apreq/trunk/glue/perl/lib/Apache2/Upload.pm?rev=165021&r1=165020&r2=165021&view=diff
==============================================================================
--- httpd/apreq/trunk/glue/perl/lib/Apache2/Upload.pm (original)
+++ httpd/apreq/trunk/glue/perl/lib/Apache2/Upload.pm Wed Apr 27 11:06:21 2005
@@ -1,6 +1,7 @@
package Apache2::Upload;
use Apache2::Request;
push our @ISA, qw/APR::Request::Param/;
+our $VERSION = "2.05-dev";
no strict 'refs';
for (qw/slurp type size link tempname fh io filename/) {
*{$_} = *{"APR::Request::Param::upload_$_"}{CODE};
