r74058 - in /branches/upstream/libplack-perl/current: Changes META.yml lib/Plack.pm lib/Plack/Request.pm lib/Plack/Response.pm lib/Plack/Server/ServerSimple.pm lib/Plack/Test/Suite.pm t/Plack-Handler/output_encoding.t
ghedo-guest at users.alioth.debian.org
ghedo-guest at users.alioth.debian.org
Fri May 6 16:45:31 UTC 2011
Author: ghedo-guest
Date: Fri May 6 16:45:23 2011
New Revision: 74058
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=74058
Log:
[svn-upgrade] new version libplack-perl (0.9978)
Modified:
branches/upstream/libplack-perl/current/Changes
branches/upstream/libplack-perl/current/META.yml
branches/upstream/libplack-perl/current/lib/Plack.pm
branches/upstream/libplack-perl/current/lib/Plack/Request.pm
branches/upstream/libplack-perl/current/lib/Plack/Response.pm
branches/upstream/libplack-perl/current/lib/Plack/Server/ServerSimple.pm
branches/upstream/libplack-perl/current/lib/Plack/Test/Suite.pm
branches/upstream/libplack-perl/current/t/Plack-Handler/output_encoding.t
Modified: branches/upstream/libplack-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libplack-perl/current/Changes?rev=74058&op=diff
==============================================================================
--- branches/upstream/libplack-perl/current/Changes (original)
+++ branches/upstream/libplack-perl/current/Changes Fri May 6 16:45:23 2011
@@ -1,6 +1,11 @@
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.9978 Wed May 4 11:29:12 PDT 2011
+ [TEST FIXES]
+ - Fixed a failing output_encoding.t because of FCGI dependencies
+ - Improved Plack::Test::Suite documentation
0.9977 Sun May 1 12:16:08 PDT 2011
[BUG FIXES]
Modified: branches/upstream/libplack-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libplack-perl/current/META.yml?rev=74058&op=diff
==============================================================================
--- branches/upstream/libplack-perl/current/META.yml (original)
+++ branches/upstream/libplack-perl/current/META.yml Fri May 6 16:45:23 2011
@@ -40,4 +40,4 @@
homepage: http://plackperl.org
license: http://dev.perl.org/licenses/
repository: git://github.com/miyagawa/Plack.git
-version: 0.9977
+version: 0.9978
Modified: branches/upstream/libplack-perl/current/lib/Plack.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libplack-perl/current/lib/Plack.pm?rev=74058&op=diff
==============================================================================
--- branches/upstream/libplack-perl/current/lib/Plack.pm (original)
+++ branches/upstream/libplack-perl/current/lib/Plack.pm Fri May 6 16:45:23 2011
@@ -3,7 +3,7 @@
use strict;
use warnings;
use 5.008_001;
-our $VERSION = '0.9977';
+our $VERSION = '0.9978';
$VERSION = eval $VERSION;
1;
Modified: branches/upstream/libplack-perl/current/lib/Plack/Request.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libplack-perl/current/lib/Plack/Request.pm?rev=74058&op=diff
==============================================================================
--- branches/upstream/libplack-perl/current/lib/Plack/Request.pm (original)
+++ branches/upstream/libplack-perl/current/lib/Plack/Request.pm Fri May 6 16:45:23 2011
@@ -2,7 +2,7 @@
use strict;
use warnings;
use 5.008_001;
-our $VERSION = '0.9977';
+our $VERSION = '0.9978';
$VERSION = eval $VERSION;
use HTTP::Headers;
Modified: branches/upstream/libplack-perl/current/lib/Plack/Response.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libplack-perl/current/lib/Plack/Response.pm?rev=74058&op=diff
==============================================================================
--- branches/upstream/libplack-perl/current/lib/Plack/Response.pm (original)
+++ branches/upstream/libplack-perl/current/lib/Plack/Response.pm Fri May 6 16:45:23 2011
@@ -1,7 +1,7 @@
package Plack::Response;
use strict;
use warnings;
-our $VERSION = '0.9977';
+our $VERSION = '0.9978';
$VERSION = eval $VERSION;
use Plack::Util::Accessor qw(body status);
Modified: branches/upstream/libplack-perl/current/lib/Plack/Server/ServerSimple.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libplack-perl/current/lib/Plack/Server/ServerSimple.pm?rev=74058&op=diff
==============================================================================
--- branches/upstream/libplack-perl/current/lib/Plack/Server/ServerSimple.pm (original)
+++ branches/upstream/libplack-perl/current/lib/Plack/Server/ServerSimple.pm Fri May 6 16:45:23 2011
@@ -1,6 +1,6 @@
package Plack::Server::ServerSimple;
use strict;
-our $VERSION = '0.9977';
+our $VERSION = '0.9978';
$VERSION = eval $VERSION;
use parent qw(Plack::Handler::HTTP::Server::Simple);
Modified: branches/upstream/libplack-perl/current/lib/Plack/Test/Suite.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libplack-perl/current/lib/Plack/Test/Suite.pm?rev=74058&op=diff
==============================================================================
--- branches/upstream/libplack-perl/current/lib/Plack/Test/Suite.pm (original)
+++ branches/upstream/libplack-perl/current/lib/Plack/Test/Suite.pm Fri May 6 16:45:23 2011
@@ -247,6 +247,7 @@
is $res->header('content_type'), 'text/plain';
is $res->content, join("\n",
'REQUEST_METHOD:GET',
+ "SCRIPT_NAME:$ENV{PLACK_TEST_SCRIPT_NAME}",
'PATH_INFO:/foo/',
'QUERY_STRING:dankogai=kogaidan',
'SERVER_NAME:127.0.0.1',
@@ -256,7 +257,7 @@
sub {
my $env = shift;
my $body;
- $body .= $_ . ':' . $env->{$_} . "\n" for qw/REQUEST_METHOD PATH_INFO QUERY_STRING SERVER_NAME SERVER_PORT/;
+ $body .= $_ . ':' . $env->{$_} . "\n" for qw/REQUEST_METHOD SCRIPT_NAME PATH_INFO QUERY_STRING SERVER_NAME SERVER_PORT/;
return [
200,
[ 'Content-Type' => 'text/plain', ],
@@ -769,9 +770,7 @@
my $cb = sub {
my $req = shift;
$req->uri->port($http_port || $port);
- if ($ENV{PLACK_TEST_SCRIPT_NAME}) {
- $req->uri->path($ENV{PLACK_TEST_SCRIPT_NAME} . $req->uri->path);
- }
+ $req->uri->path(($ENV{PLACK_TEST_SCRIPT_NAME}||"") . $req->uri->path);
$req->header('X-Plack-Test' => $i);
return $ua->request($req);
};
Modified: branches/upstream/libplack-perl/current/t/Plack-Handler/output_encoding.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libplack-perl/current/t/Plack-Handler/output_encoding.t?rev=74058&op=diff
==============================================================================
--- branches/upstream/libplack-perl/current/t/Plack-Handler/output_encoding.t (original)
+++ branches/upstream/libplack-perl/current/t/Plack-Handler/output_encoding.t Fri May 6 16:45:23 2011
@@ -20,7 +20,7 @@
my $mangle_file = 'mangle_test.txt';
test_handler( 'CGI', $mangler, $mangle_file );
- test_handler( 'FCGI', $mangler, $mangle_file );
+# test_handler( 'FCGI', $mangler, $mangle_file );
return;
}
More information about the Pkg-perl-cvs-commits
mailing list