diff options
| author | Buchan Milne <buchan@mageia.org> | 2010-11-03 09:34:45 +0000 |
|---|---|---|
| committer | Buchan Milne <buchan@mageia.org> | 2010-11-03 09:34:45 +0000 |
| commit | a2976ea837ac446e02681402db35976fa3e4f380 (patch) | |
| tree | 25af887174bb8a1dcc9b2f76b5ff463f186ec1db /lib/CatDap/Controller/user.pm | |
| parent | 3dbf3dc41d0534e552118eed3d3b3ecfb72f6032 (diff) | |
| download | identity-a2976ea837ac446e02681402db35976fa3e4f380.tar identity-a2976ea837ac446e02681402db35976fa3e4f380.tar.gz identity-a2976ea837ac446e02681402db35976fa3e4f380.tar.bz2 identity-a2976ea837ac446e02681402db35976fa3e4f380.tar.xz identity-a2976ea837ac446e02681402db35976fa3e4f380.zip | |
Update cookie expiry on successful re-auth
Diffstat (limited to 'lib/CatDap/Controller/user.pm')
| -rw-r--r-- | lib/CatDap/Controller/user.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/CatDap/Controller/user.pm b/lib/CatDap/Controller/user.pm index dc68d97..c221eff 100644 --- a/lib/CatDap/Controller/user.pm +++ b/lib/CatDap/Controller/user.pm @@ -93,6 +93,7 @@ sub auto : Private { $password = $cipher->decrypt($c->session->{enc_password}); $c->log->info("Re-authenticating user " . $c->session->{user}); $c->authenticate({username => $c->session->{user},password => $password}); + $c->res->cookies->{'key'} = {value => $key, expires => '+10m'}; $c->stash(pages => roles2pages($c->user->roles)); $c->log->info($@) if $@; |