Mailing-List: contact apreq-cvs-help@httpd.apache.org; run by ezmlm
Precedence: bulk
Reply-To: apreq-dev@httpd.apache.org
Content-Type: text/plain; charset="utf-8"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Subject: svn commit: r734170 - in /httpd/apreq/trunk: build/update_version.pl
 glue/perl/lib/Apache2/Cookie.pm glue/perl/lib/Apache2/Request.pm
 glue/perl/lib/Apache2/Upload.pm
Date: Tue, 13 Jan 2009 16:23:10 -0000
To: apreq-cvs@httpd.apache.org
From: joes@apache.org
Message-Id: <20090113162331.1930F238895D@eris.apache.org>

Author: joes
Date: Tue Jan 13 08:22:44 2009
New Revision: 734170

URL: http://svn.apache.org/viewvc?rev=734170&view=rev
Log:
fix update_version.pl script

Modified:
    httpd/apreq/trunk/build/update_version.pl
    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/build/update_version.pl
URL: http://svn.apache.org/viewvc/httpd/apreq/trunk/build/update_version.pl?rev=734170&r1=734169&r2=734170&view=diff
==============================================================================
--- httpd/apreq/trunk/build/update_version.pl (original)
+++ httpd/apreq/trunk/build/update_version.pl Tue Jan 13 08:22:44 2009
@@ -28,7 +28,7 @@
 find(sub { push @pm, $File::Find::name if /\.pm$/ },
      qw(glue/perl/lib/Apache2));
 
-my $pattern = '(?<=our $VERSION = ")([^"]+)(?=")';
+my $pattern = '(?<=our \$VERSION = ")([^"]+)(?=")';
 system "perl -i -ple 's/$pattern/$version/' @pm";
 
 #

Modified: httpd/apreq/trunk/glue/perl/lib/Apache2/Cookie.pm
URL: http://svn.apache.org/viewvc/httpd/apreq/trunk/glue/perl/lib/Apache2/Cookie.pm?rev=734170&r1=734169&r2=734170&view=diff
==============================================================================
--- httpd/apreq/trunk/glue/perl/lib/Apache2/Cookie.pm (original)
+++ httpd/apreq/trunk/glue/perl/lib/Apache2/Cookie.pm Tue Jan 13 08:22:44 2009
@@ -9,7 +9,7 @@
 use overload '""' => sub { shift->as_string() }, fallback => 1;
 
 push our @ISA, "APR::Request::Cookie";
-our $VERSION = "2.08";
+our $VERSION = "2.11";
 
 sub new {
     my ($class, $r, %attrs) = @_;

Modified: httpd/apreq/trunk/glue/perl/lib/Apache2/Request.pm
URL: http://svn.apache.org/viewvc/httpd/apreq/trunk/glue/perl/lib/Apache2/Request.pm?rev=734170&r1=734169&r2=734170&view=diff
==============================================================================
--- httpd/apreq/trunk/glue/perl/lib/Apache2/Request.pm (original)
+++ httpd/apreq/trunk/glue/perl/lib/Apache2/Request.pm Tue Jan 13 08:22:44 2009
@@ -3,7 +3,7 @@
 use APR::Request::Apache2;
 use Apache2::RequestRec;
 push our @ISA, qw/Apache2::RequestRec APR::Request::Apache2/;
-our $VERSION = "2.08";
+our $VERSION = "2.11";
 
 my %old_limits = (
     post_max => "read_limit",

Modified: httpd/apreq/trunk/glue/perl/lib/Apache2/Upload.pm
URL: http://svn.apache.org/viewvc/httpd/apreq/trunk/glue/perl/lib/Apache2/Upload.pm?rev=734170&r1=734169&r2=734170&view=diff
==============================================================================
--- httpd/apreq/trunk/glue/perl/lib/Apache2/Upload.pm (original)
+++ httpd/apreq/trunk/glue/perl/lib/Apache2/Upload.pm Tue Jan 13 08:22:44 2009
@@ -1,7 +1,7 @@
 package Apache2::Upload;
 use Apache2::Request;
 push our @ISA, qw/APR::Request::Param/;
-our $VERSION = "2.08";
+our $VERSION = "2.11";
 no strict 'refs';
 for (qw/slurp type size link tempname fh io filename/) {
     *{$_} = *{"APR::Request::Param::upload_$_"}{CODE};