From 9545900643b2340995e11f90f095b36e64b564f3 Mon Sep 17 00:00:00 2001
From: Matt Phillips <mattp@cpan.org>
Date: Sun, 16 Sep 2012 15:03:04 -0300
Subject: [PATCH] Update lib/Plack/Middleware/CSRFBlock.pm

$env should be passed to token_not_found consistently, except it is not on form POST.
---
 lib/Plack/Middleware/CSRFBlock.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Plack/Middleware/CSRFBlock.pm b/lib/Plack/Middleware/CSRFBlock.pm
index ac7eaff..83492d3 100644
--- a/lib/Plack/Middleware/CSRFBlock.pm
+++ b/lib/Plack/Middleware/CSRFBlock.pm
@@ -59,7 +59,7 @@ sub call {
     ) {
         my $ct = $1;
         my $token = $session->{$self->session_key}
-            or return $self->token_not_found;
+            or return $self->token_not_found($env);
 
         my $cl = $env->{CONTENT_LENGTH};
         my $re = $self->_param_re->{$ct};