aboutsummaryrefslogtreecommitdiffstats
path: root/perllib
diff options
context:
space:
mode:
authorDave Arter <davea@mysociety.org>2019-03-07 10:43:32 +0000
committerDave Arter <davea@mysociety.org>2019-03-20 09:47:02 +0000
commit0358523592d75cd274b9675fddd3752fc0a5847b (patch)
treee87defb62875b796f713a2344a8b5127ff837186 /perllib
parent4c1a483e4baa821c7d7b75e1bcef293ab13919ed (diff)
[Buckinghamshire] Send drainage reports via email as well as Open311
Fixes mysociety/fixmystreet-commercial#1306
Diffstat (limited to 'perllib')
-rw-r--r--perllib/FixMyStreet/Cobrand/Buckinghamshire.pm14
1 files changed, 10 insertions, 4 deletions
diff --git a/perllib/FixMyStreet/Cobrand/Buckinghamshire.pm b/perllib/FixMyStreet/Cobrand/Buckinghamshire.pm
index 5e9316709..ef5b53356 100644
--- a/perllib/FixMyStreet/Cobrand/Buckinghamshire.pm
+++ b/perllib/FixMyStreet/Cobrand/Buckinghamshire.pm
@@ -107,11 +107,17 @@ sub open311_post_send {
# Check Open311 was successful
return unless $row->external_id;
- # For Flytipping, send an email also
- return unless $row->category eq 'Flytipping';
+ # For certain categories, send an email also
+ my $addresses = {
+ 'Flytipping' => [ join('@', 'illegaldumpingcosts', $self->admin_user_domain), "TfB" ],
+ 'Blocked drain' => [ join('@', 'floodmanagement', $self->admin_user_domain), "Flood Management" ],
+ 'Ditch issue' => [ join('@', 'floodmanagement', $self->admin_user_domain), "Flood Management" ],
+ 'Flooded subway' => [ join('@', 'floodmanagement', $self->admin_user_domain), "Flood Management" ],
+ };
+ my $dest = $addresses->{$row->category};
+ return unless $dest;
- my $e = join('', 'illegaldumpingcosts', '@', $self->admin_user_domain);
- my $sender = FixMyStreet::SendReport::Email->new( to => [ [ $e, 'TfB' ] ] );
+ my $sender = FixMyStreet::SendReport::Email->new( to => [ $dest ] );
$sender->send($row, $h);
}