PrivateCoffee/travelynx
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

maintenance: show details when about to delete a large amount of UIDs

Browse source
This commit is contained in:
Daniel Friesel 2022-07-10 10:42:05 +02:00
parent a88dea059b
commit 105fc8a4a1
No known key found for this signature in database
GPG key ID: 100D5BFB5166E005
1 changed files with 11 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
lib/Travelynx/Command/maintenance.pm
View file

@ -126,6 +126,17 @@ sub run {
"About to delete %d accounts, which is quite a lot.\n", "About to delete %d accounts, which is quite a lot.\n",
scalar @uids_to_delete scalar @uids_to_delete
); );
for my $uid (@uids_to_delete) {
my $journeys_res = $db->select(
'journeys',
'count(*) as count',
{ user_id => $uid }
)->hash;
printf STDERR (
" - UID %5d (%4d journeys)\n",
$uid, $journeys_res->{count}
);
}
say STDERR 'Aborting maintenance. Please investigate.'; say STDERR 'Aborting maintenance. Please investigate.';
exit(1); exit(1);
} }