diff options
| author | Struan Donald <struan@exo.org.uk> | 2012-03-23 15:06:11 +0000 |
|---|---|---|
| committer | Struan Donald <struan@exo.org.uk> | 2012-03-23 15:06:11 +0000 |
| commit | 3da74c1951b4159bdc5bdd1d8708d4fd8db68577 (patch) | |
| tree | 0e3f213527d335c7ce0851c20e4395c7d641e0f7 /perllib/Open311.pm | |
| parent | 380b68fac937381221b7a90055ee1b5d64ab96e6 (diff) | |
submit title and alerts_requested over open311
Diffstat (limited to 'perllib/Open311.pm')
| -rw-r--r-- | perllib/Open311.pm | 6 |
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 ) { |