From cadd35d4853974178a8a04ef7e93ec58f69607ee Mon Sep 17 00:00:00 2001
From: Matthew Somerville <matthew@mysociety.org>
Date: Fri, 23 Mar 2012 16:35:06 +0000
Subject: [PATCH] Needed brackets, dur (bugfix to de7a31da).

---
 perllib/Catalyst/Plugin/Session/State/Cookie.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perllib/Catalyst/Plugin/Session/State/Cookie.pm b/perllib/Catalyst/Plugin/Session/State/Cookie.pm
index 7c9f3287887..ead8be38d4a 100644
--- a/perllib/Catalyst/Plugin/Session/State/Cookie.pm
+++ b/perllib/Catalyst/Plugin/Session/State/Cookie.pm
@@ -51,7 +51,7 @@ sub cookie_is_rejecting {
     my ( $c, $cookie ) = @_;
 
     # Don't output cookie for JS files. mySociety addition
-    return 1 if substr $c->request->path, -3 eq '.js';
+    return 1 if substr($c->request->path, -3) eq '.js';
 
     if ( $cookie->{path} ) {
         return 1 if index '/'.$c->request->path, $cookie->{path};