Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Checking in changes prior to tagging of version 0.9007. Changelog dif…

…f is:

diff --git a/Changes b/Changes
index 5272629..7660834 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,13 @@
 Revision history for Perl extension Plack

+0.9007: Sat Oct 24 17:41:33 PDT 2009
+        - Fixed Server::CGI to really inline fuctions to avoid warnings
+        - Fixed Middleware::AccessLog to let %{..}t strftime log format work (beppu)
+        - Fixed a flush bug in gzip encoding in Middleware::Deflater
+        - Fixed a bug in Middleware::AccessLog so POSIX strftime always works in English (fayland)
+        - Added Middleware::ContetnMD5 (Fayland)
+        - Fixed plackup -r to actually reload the application code (robinsmidsrod)
+
 0.9006: Fri Oct 23 01:21:13 PDT 2009
         - Support streaming interface in most middlewares
         - Added Middleware::Deflater (not recommended to use: see POD)
  • Loading branch information...
commit d95e74d9c0def4fa9edd0199a8a6c802c8aaf3c6 1 parent bb98c53
@miyagawa miyagawa authored
View
8 Changes
@@ -1,5 +1,13 @@
Revision history for Perl extension Plack
+0.9007: Sat Oct 24 17:41:33 PDT 2009
+ - Fixed Server::CGI to really inline fuctions to avoid warnings
+ - Fixed Middleware::AccessLog to let %{..}t strftime log format work (beppu)
+ - Fixed a flush bug in gzip encoding in Middleware::Deflater
+ - Fixed a bug in Middleware::AccessLog so POSIX strftime always works in English (fayland)
+ - Added Middleware::ContetnMD5 (Fayland)
+ - Fixed plackup -r to actually reload the application code (robinsmidsrod)
+
0.9006: Fri Oct 23 01:21:13 PDT 2009
- Support streaming interface in most middlewares
- Added Middleware::Deflater (not recommended to use: see POD)
View
2  MANIFEST
@@ -70,6 +70,7 @@ lib/Plack/Middleware/AccessLog/Timed.pm
lib/Plack/Middleware/Chunked.pm
lib/Plack/Middleware/ConditionalGET.pm
lib/Plack/Middleware/ContentLength.pm
+lib/Plack/Middleware/ContentMD5.pm
lib/Plack/Middleware/Deflater.pm
lib/Plack/Middleware/ErrorDocument.pm
lib/Plack/Middleware/JSONP.pm
@@ -109,6 +110,7 @@ t/Plack-Middleware/access_log_timed.t
t/Plack-Middleware/chunked.t
t/Plack-Middleware/conditionalget.t
t/Plack-Middleware/content_length.t
+t/Plack-Middleware/deflater.t
t/Plack-Middleware/error_document.t
t/Plack-Middleware/errors/404.html
t/Plack-Middleware/errors/500.html
View
2  lib/Plack.pm
@@ -3,7 +3,7 @@ package Plack;
use strict;
use warnings;
use 5.008_001;
-our $VERSION = '0.9006';
+our $VERSION = '0.9007';
1;
__END__
View
4 lib/Plack/Middleware/Deflater.pm
@@ -19,7 +19,7 @@ sub call {
my $h = Plack::Util::headers($res->[1]);
if (Plack::Util::status_with_no_entity_body($res->[0]) or
- $h->get('Cache-Control') =~ /\bno-transform\b/) {
+ $h->exists('Cache-Control') && $h->get('Cache-Control') =~ /\bno-transform\b/) {
return;
}
@@ -32,7 +32,7 @@ sub call {
}
}
- my @vary = split /\s*,\s*/, $h->get('Vary');
+ my @vary = split /\s*,\s*/, ($h->get('Vary') || '');
push @vary, 'Accept-Encoding';
$h->set('Vary' => join(",", @vary));
View
1  t/Plack-Middleware/deflater.t
@@ -21,6 +21,7 @@ my $app = sub { (shift @app)->(@_) };
test_psgi app => Plack::Middleware::Deflater->wrap($app), client => sub {
my $cb = shift;
+ no warnings;
local *HTTP::Request::decodable = sub { wantarray ? ('gzip') : 'gzip' };
for (0..$#app) {
my $req = GET "http://localhost/";
Please sign in to comment.
Something went wrong with that request. Please try again.