diff options
| author | Matthew Somerville <matthew@mysociety.org> | 2020-06-11 17:25:49 +0100 |
|---|---|---|
| committer | Matthew Somerville <matthew@mysociety.org> | 2020-06-11 17:25:51 +0100 |
| commit | 251acf7799e78fd46a39154f0381c7470d5542a9 (patch) | |
| tree | 2e766f1ee9cade2a742af91406931c80e4fee616 /perllib/FixMyStreet/Script/Inactive.pm | |
| parent | 1640af532683ef1c698c96c80c642fbcfe76b022 (diff) | |
Skip accounts without email for inactive emails.
Diffstat (limited to 'perllib/FixMyStreet/Script/Inactive.pm')
| -rw-r--r-- | perllib/FixMyStreet/Script/Inactive.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/Script/Inactive.pm b/perllib/FixMyStreet/Script/Inactive.pm index 4d28057d4..6b3372a2b 100644 --- a/perllib/FixMyStreet/Script/Inactive.pm +++ b/perllib/FixMyStreet/Script/Inactive.pm @@ -185,6 +185,7 @@ sub email_inactive_users { }); while (my $user = $users->next) { next if $user->get_extra_metadata('inactive_email_sent'); + next unless $user->email && $user->email_verified; say "Emailing user #" . $user->id if $self->verbose; next if $self->dry_run; |