aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perllib/Open311.pm6
1 files changed, 6 insertions, 0 deletions
diff --git a/perllib/Open311.pm b/perllib/Open311.pm
index 09ab8b326..74fa9438b 100644
--- a/perllib/Open311.pm
+++ b/perllib/Open311.pm
@@ -166,6 +166,12 @@ sub post_service_request_update {
# also need last_name, title
};
+ if ( $comment->extra ) {
+ $params{'email_alerts_request'}
+ = $comment->extra->{email_alerts_requested} ? 'TRUE' : 'FALSE';
+ $params->{'title'} = $comment->extra->{title};
+ }
+
my $response = $self->_post( $self->endpoints->{update}, $params );
if ( $response ) {