aboutsummaryrefslogtreecommitdiffstats
path: root/perllib
diff options
context:
space:
mode:
authorMatthew Somerville <matthew@mysociety.org>2011-06-29 10:46:34 +0100
committerMatthew Somerville <matthew@mysociety.org>2011-06-29 22:40:21 +0100
commitba55bd341e99c674619ac6295526038b5770fe3e (patch)
treed6b7287a854fbe6454b33dd08e6bd96bb13e436c /perllib
parentd6d8dc4e0080e3184751cf381bbd14581c970c62 (diff)
Get cookie expiry to work, and correct IDs on checkboxes.
Diffstat (limited to 'perllib')
-rw-r--r--perllib/Catalyst/Plugin/Session/State/Cookie.pm2
-rw-r--r--perllib/FixMyStreet/App/Controller/Auth.pm6
2 files changed, 7 insertions, 1 deletions
diff --git a/perllib/Catalyst/Plugin/Session/State/Cookie.pm b/perllib/Catalyst/Plugin/Session/State/Cookie.pm
index 7ffc77f1f..c4b61123b 100644
--- a/perllib/Catalyst/Plugin/Session/State/Cookie.pm
+++ b/perllib/Catalyst/Plugin/Session/State/Cookie.pm
@@ -127,6 +127,8 @@ sub set_session_cookie_expire {
else {
delete $c->session->{__cookie_expires};
}
+ # Force the cookie to be regenerated
+ $c->set_session_id( $c->sessionid );
return 1;
}
diff --git a/perllib/FixMyStreet/App/Controller/Auth.pm b/perllib/FixMyStreet/App/Controller/Auth.pm
index 8aed746ec..ebb3510d0 100644
--- a/perllib/FixMyStreet/App/Controller/Auth.pm
+++ b/perllib/FixMyStreet/App/Controller/Auth.pm
@@ -71,7 +71,11 @@ sub sign_in : Private {
return 1;
}
- $c->stash->{sign_in_error} = 1;
+ $c->stash(
+ sign_in_error => 1,
+ email => $email,
+ remember_me => $remember_me,
+ );
return;
}