Merge branch 'user-inactivity'

1 files changed, 2 insertions, 0 deletions

diff --git a/perllib/Catalyst/Plugin/FixMyStreet/Session/StoreSessions.pm b/perllib/Catalyst/Plugin/FixMyStreet/Session/StoreSessions.pm
index 5e7a3cede..30149fc2b 100644
--- a/perllib/Catalyst/Plugin/FixMyStreet/Session/StoreSessions.pm
+++ b/perllib/Catalyst/Plugin/FixMyStreet/Session/StoreSessions.pm
@@ -7,6 +7,7 @@ after set_authenticated => sub {
     my $sessions = $c->user->get_extra_metadata('sessions');
     push @$sessions, $c->sessionid;
     $c->user->set_extra_metadata('sessions', $sessions);
+    $c->user->set_last_active;
     $c->user->update;
 };
 
@@ -16,6 +17,7 @@ before logout => sub {
         my $sessions = $user->get_extra_metadata('sessions');
         $sessions = [ grep { $_ ne $c->sessionid } @$sessions ];
         @$sessions ? $user->set_extra_metadata('sessions', $sessions) : $user->unset_extra_metadata('sessions');
+        $user->set_last_active;
         $user->update;
     }
 };