aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/Open311.pm
diff options
context:
space:
mode:
authorDave Arter <davea@mysociety.org>2018-02-19 12:37:30 +0000
committerDave Arter <davea@mysociety.org>2018-02-19 14:23:32 +0000
commitd57cf05da497bc013a580e6895002d183ec31e2b (patch)
tree0cf07e169bb10dc5bbe4d7251bc64dec6d6c8392 /perllib/Open311.pm
parentef28987bc739f3c6cf3119574cf311cfae069b2e (diff)
[Bristol] Always include an email address for Open311 reports
Diffstat (limited to 'perllib/Open311.pm')
-rw-r--r--perllib/Open311.pm7
1 files changed, 7 insertions, 0 deletions
diff --git a/perllib/Open311.pm b/perllib/Open311.pm
index 90b593256..f4229d7ed 100644
--- a/perllib/Open311.pm
+++ b/perllib/Open311.pm
@@ -31,6 +31,7 @@ has extended_description => ( is => 'ro', isa => Str, default => 1 );
has use_service_as_deviceid => ( is => 'ro', isa => Bool, default => 0 );
has use_extended_updates => ( is => 'ro', isa => Bool, default => 0 );
has extended_statuses => ( is => 'ro', isa => Bool, default => 0 );
+has always_send_email => ( is => 'ro', isa => Bool, default => 0 );
before [
qw/get_service_list get_service_meta_info get_service_requests get_service_request_updates
@@ -136,6 +137,12 @@ sub _populate_service_request_params {
$params->{phone} = $problem->user->phone if $problem->user->phone;
$params->{email} = $problem->user->email if $problem->user->email;
+ # Some endpoints don't follow the Open311 spec correctly and require an
+ # email address for service requests.
+ if ($self->always_send_email && !$params->{email}) {
+ $params->{email} = FixMyStreet->config('DO_NOT_REPLY_EMAIL');
+ }
+
# if you click nearby reports > skip map then it's possible
# to end up with used_map = f and nothing in postcode
if ( $problem->used_map || $self->always_send_latlong