diff options
| author | Matthew Somerville <matthew-github@dracos.co.uk> | 2018-01-04 13:10:35 +0000 |
|---|---|---|
| committer | Matthew Somerville <matthew-github@dracos.co.uk> | 2018-01-04 15:32:24 +0000 |
| commit | a9932722b4cf2103d35f8f4c23ad2918aad0a96c (patch) | |
| tree | 15124df09ba70b16a645cc9dd403d4f0f99ee481 /perllib/FixMyStreet/App/Response.pm | |
| parent | 3af2658153e35599c50a51c3a85a05e0e365e071 (diff) | |
Include "SameSite=Lax" with all set cookies.
This prevents FixMyStreet cookies from being sent from third-party
<img>s and the like, in supporting browsers.
Diffstat (limited to 'perllib/FixMyStreet/App/Response.pm')
| -rw-r--r-- | perllib/FixMyStreet/App/Response.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/App/Response.pm b/perllib/FixMyStreet/App/Response.pm index 16ebf995f..6b32e6ebb 100644 --- a/perllib/FixMyStreet/App/Response.pm +++ b/perllib/FixMyStreet/App/Response.pm @@ -13,7 +13,7 @@ around 'redirect' => sub { return $self->$orig() unless @_; # getter my $agent = $self->_context->request->user_agent; - return $self->$orig(@_) unless $agent =~ /Edge\/14/; # Only care about Edge + return $self->$orig(@_) unless $agent && $agent =~ /Edge\/14/; # Only care about Edge # Instead of a redirect, output HTML that redirects $self->body(<<END |