r70011 - in /trunk/libplack-perl: Changes META.yml debian/changelog lib/Plack.pm lib/Plack/Request.pm lib/Plack/Response.pm lib/Plack/Server/ServerSimple.pm lib/Plack/Util.pm

[jawnsy-guest at users.alioth.debian.org]

Author: jawnsy-guest
Date: Sun Feb 27 22:29:43 2011
New Revision: 70011

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=70011
Log:
NOTE: These changes are in 0.9973 as well -- jawnsy

Modified:
    trunk/libplack-perl/Changes
    trunk/libplack-perl/META.yml
    trunk/libplack-perl/debian/changelog
    trunk/libplack-perl/lib/Plack.pm
    trunk/libplack-perl/lib/Plack/Request.pm
    trunk/libplack-perl/lib/Plack/Response.pm
    trunk/libplack-perl/lib/Plack/Server/ServerSimple.pm
    trunk/libplack-perl/lib/Plack/Util.pm

Modified: trunk/libplack-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libplack-perl/Changes?rev=70011&op=diff
==============================================================================
--- trunk/libplack-perl/Changes (original)
+++ trunk/libplack-perl/Changes Sun Feb 27 22:29:43 2011
@@ -1,6 +1,9 @@
 Revision history for Perl extension Plack
 
 Take a look at http://github.com/miyagawa/Plack/issues for the planned changes before 1.0 release.
+
+0.9973  Sat Feb 26 09:40:15 PST 2011
+        - Fixed the regexp in the code check added in 0.9972 (leedo)
 
 0.9972  Thu Feb 24 10:50:01 PST 2011
         - Fixed the Plack::Runner docs to avoid the cargo cult issue of __FILE__ eq $0

Modified: trunk/libplack-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libplack-perl/META.yml?rev=70011&op=diff
==============================================================================
--- trunk/libplack-perl/META.yml (original)
+++ trunk/libplack-perl/META.yml Sun Feb 27 22:29:43 2011
@@ -40,4 +40,4 @@
   homepage: http://plackperl.org
   license: http://dev.perl.org/licenses/
   repository: git://github.com/miyagawa/Plack.git
-version: 0.9972
+version: 0.9973

Modified: trunk/libplack-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libplack-perl/debian/changelog?rev=70011&op=diff
==============================================================================
--- trunk/libplack-perl/debian/changelog (original)
+++ trunk/libplack-perl/debian/changelog Sun Feb 27 22:29:43 2011
@@ -1,11 +1,11 @@
-libplack-perl (0.9972-1) UNRELEASED; urgency=low
+libplack-perl (0.9973-1) UNRELEASED; urgency=low
 
-  [ Maximilian Gass ]
   Plack 0.9971 breaks compatibility, a change that might be reverted. I am
   waiting for a decision/response by upstream.
 
-  NOTE: These changes are in 0.9972 as well -- jawnsy
+  NOTE: These changes are in 0.9973 as well -- jawnsy
 
+  [ Maximilian Gass ]
   * New upstream release
   * Remove fix-pod-spelling.patch, has been applied upstream
   * Add myself to Uploaders
@@ -13,7 +13,7 @@
   [ Jonathan Yu ]
   * New upstream release
 
- -- Jonathan Yu <jawnsy at cpan.org>  Sat, 26 Feb 2011 13:37:38 -0500
+ -- Jonathan Yu <jawnsy at cpan.org>  Sun, 27 Feb 2011 17:28:58 -0500
 
 libplack-perl (0.9969-1) unstable; urgency=low
 

Modified: trunk/libplack-perl/lib/Plack.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libplack-perl/lib/Plack.pm?rev=70011&op=diff
==============================================================================
--- trunk/libplack-perl/lib/Plack.pm (original)
+++ trunk/libplack-perl/lib/Plack.pm Sun Feb 27 22:29:43 2011
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 use 5.008_001;
-our $VERSION = '0.9972';
+our $VERSION = '0.9973';
 $VERSION = eval $VERSION;
 
 1;

Modified: trunk/libplack-perl/lib/Plack/Request.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libplack-perl/lib/Plack/Request.pm?rev=70011&op=diff
==============================================================================
--- trunk/libplack-perl/lib/Plack/Request.pm (original)
+++ trunk/libplack-perl/lib/Plack/Request.pm Sun Feb 27 22:29:43 2011
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 use 5.008_001;
-our $VERSION = '0.9972';
+our $VERSION = '0.9973';
 $VERSION = eval $VERSION;
 
 use HTTP::Headers;

Modified: trunk/libplack-perl/lib/Plack/Response.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libplack-perl/lib/Plack/Response.pm?rev=70011&op=diff
==============================================================================
--- trunk/libplack-perl/lib/Plack/Response.pm (original)
+++ trunk/libplack-perl/lib/Plack/Response.pm Sun Feb 27 22:29:43 2011
@@ -1,7 +1,7 @@
 package Plack::Response;
 use strict;
 use warnings;
-our $VERSION = '0.9972';
+our $VERSION = '0.9973';
 $VERSION = eval $VERSION;
 
 use Plack::Util::Accessor qw(body status);

Modified: trunk/libplack-perl/lib/Plack/Server/ServerSimple.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libplack-perl/lib/Plack/Server/ServerSimple.pm?rev=70011&op=diff
==============================================================================
--- trunk/libplack-perl/lib/Plack/Server/ServerSimple.pm (original)
+++ trunk/libplack-perl/lib/Plack/Server/ServerSimple.pm Sun Feb 27 22:29:43 2011
@@ -1,6 +1,6 @@
 package Plack::Server::ServerSimple;
 use strict;
-our $VERSION = '0.9972';
+our $VERSION = '0.9973';
 $VERSION = eval $VERSION;
 
 use parent qw(Plack::Handler::HTTP::Server::Simple);

Modified: trunk/libplack-perl/lib/Plack/Util.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libplack-perl/lib/Plack/Util.pm?rev=70011&op=diff
==============================================================================
--- trunk/libplack-perl/lib/Plack/Util.pm (original)
+++ trunk/libplack-perl/lib/Plack/Util.pm Sun Feb 27 22:29:43 2011
@@ -124,7 +124,7 @@
     open my $fh, "<", $file or return;
 
     my $code = join '', <$fh>;
-    if ($code =~ /(__FILE__\s+eq\s+\$0|\$0\s+eq\+__FILE__)/) {
+    if ($code =~ /(__FILE__\s+eq\s+\$0|\$0\s+eq\s+__FILE__)/) {
         warn <<WARNING
 Your PSGI file ($file) seems to use the following idiom, which is known to be broken since Plack 0.9971: