From c38ca476d282c8e369ae6788b3400c4cc41f3e20 Mon Sep 17 00:00:00 2001
From: Matthew Somerville <matthew@mysociety.org>
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