summaryrefslogtreecommitdiff
path: root/lib/Travelynx/Controller/Account.pm
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2019-04-30 12:47:32 +0200
committerDaniel Friesel <derf@finalrewind.org>2019-04-30 12:48:23 +0200
commit99aa3a4a0d467fd83ba78096cf34113df797f0d8 (patch)
tree3a6e4dc9b7a7bcdb73fd3071dcca3e68c218702b /lib/Travelynx/Controller/Account.pm
parent867a5d4afbb3a5c0ad0e5dfbc10d2516e3e9123f (diff)
Implement deletion of inactive accounts
Diffstat (limited to 'lib/Travelynx/Controller/Account.pm')
-rw-r--r--lib/Travelynx/Controller/Account.pm2
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/Travelynx/Controller/Account.pm b/lib/Travelynx/Controller/Account.pm
index 962a33a..dc3adb4 100644
--- a/lib/Travelynx/Controller/Account.pm
+++ b/lib/Travelynx/Controller/Account.pm
@@ -38,6 +38,7 @@ sub do_login {
else {
if ( $self->authenticate( $user, $password ) ) {
$self->redirect_to( $self->req->param('redirect_to') // '/' );
+ $self->mark_seen( $self->current_user->{id} );
}
else {
my $data = $self->get_user_password($user);
@@ -535,6 +536,7 @@ sub account {
my ($self) = @_;
$self->render('account');
+ $self->mark_seen( $self->current_user->{id} );
}
sub json_export {