From c38ca476d282c8e369ae6788b3400c4cc41f3e20 Mon Sep 17 00:00:00 2001 From: Matthew Somerville Date: Wed, 8 Jan 2020 17:37:12 +0000 Subject: [Inactive] Ignore already anonymized users. --- perllib/FixMyStreet/Script/Inactive.pm | 1 + 1 file changed, 1 insertion(+) (limited to 'perllib/FixMyStreet/Script/Inactive.pm') diff --git a/perllib/FixMyStreet/Script/Inactive.pm b/perllib/FixMyStreet/Script/Inactive.pm index 0468d2a52..02b01b9b1 100644 --- a/perllib/FixMyStreet/Script/Inactive.pm +++ b/perllib/FixMyStreet/Script/Inactive.pm @@ -126,6 +126,7 @@ sub anonymize_users { my $users = FixMyStreet::DB->resultset("User")->search({ last_active => { '<', interval($self->anonymize) }, + email => { -not_like => 'removed-%@' . FixMyStreet->config('EMAIL_DOMAIN') }, }); while (my $user = $users->next) { -- cgit v1.2.3