aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/FixMyStreet/Script/Questionnaires.pm
diff options
context:
space:
mode:
authorMarius Halden <marius.h@lden.org>2017-12-20 01:06:27 +0100
committerMarius Halden <marius.h@lden.org>2017-12-20 01:06:27 +0100
commit8b10c8b8d787e680bb085e2a7543dac50fd39742 (patch)
tree391efde6de4944e350cc0dafbd4e1efb0613e9c3 /perllib/FixMyStreet/Script/Questionnaires.pm
parenteef35397ccf8242cdc65dc666db2958b1ee35440 (diff)
parent7e15bd3db202363db4bab8fa7c9f462eabe28fce (diff)
Merge tag 'v2.3' into fiksgatami-dev
Diffstat (limited to 'perllib/FixMyStreet/Script/Questionnaires.pm')
-rw-r--r--perllib/FixMyStreet/Script/Questionnaires.pm6
1 files changed, 5 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/Script/Questionnaires.pm b/perllib/FixMyStreet/Script/Questionnaires.pm
index ec6139d2d..5fc01512d 100644
--- a/perllib/FixMyStreet/Script/Questionnaires.pm
+++ b/perllib/FixMyStreet/Script/Questionnaires.pm
@@ -49,7 +49,11 @@ sub send_questionnaires_period {
# Not all cobrands send questionnaires
next unless $cobrand->send_questionnaires;
- next if $row->is_from_abuser;
+
+ if ($row->is_from_abuser || !$row->user->email_verified) {
+ $row->update( { send_questionnaire => 0 } );
+ next;
+ }
# Cobranded and non-cobranded messages can share a database. In this case, the conf file
# should specify a vhost to send the reports for each cobrand, so that they don't get sent