summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
Diffstat (limited to 'lib')
-rw-r--r--lib/Plack/Middleware/ETag.pm7
1 files changed, 3 insertions, 4 deletions
diff --git a/lib/Plack/Middleware/ETag.pm b/lib/Plack/Middleware/ETag.pm
index d70bc35..ad1848f 100644
--- a/lib/Plack/Middleware/ETag.pm
+++ b/lib/Plack/Middleware/ETag.pm
@@ -11,15 +11,14 @@ our $VERSION = '0.01';
use parent qw/Plack::Middleware/;
sub call {
- my ( $self, $env ) = @_;
-
- my $res = $self->app->($env);
- my $headers = $res->[1];
+ my $self = shift;
+ my $res = $self->app->(@_);
$self->response_cb(
$res,
sub {
my $res = shift;
+ my $headers = $res->[1];
return if ( !defined $res->[2] );#|| ref $res->[2] ne 'ARRAY' );
return if ( Plack::Util::header_exists( $headers, 'ETag' ) );
my $etag;