aboutsummaryrefslogtreecommitdiffstats
path: root/perllib
diff options
context:
space:
mode:
authorStruan Donald <struan@exo.org.uk>2018-09-11 12:47:54 +0100
committerStruan Donald <struan@exo.org.uk>2018-10-01 07:57:22 +0100
commitd66a953b31c3617ffa8c1af969fcc973732f231c (patch)
treec8c3072be01f67b9c7e788a9d8182685f3707f8e /perllib
parent4df175118be040ea5457850d59071e40ba3d48e8 (diff)
[Open311] add customer reference from update to problem
If an Open311 update has a customer_reference property then add that to the metadata for the problem.
Diffstat (limited to 'perllib')
-rw-r--r--perllib/Open311/GetServiceRequestUpdates.pm7
1 files changed, 7 insertions, 0 deletions
diff --git a/perllib/Open311/GetServiceRequestUpdates.pm b/perllib/Open311/GetServiceRequestUpdates.pm
index 480a78cf1..fa852a80d 100644
--- a/perllib/Open311/GetServiceRequestUpdates.pm
+++ b/perllib/Open311/GetServiceRequestUpdates.pm
@@ -115,6 +115,7 @@ sub update_comments {
my $state = $open311->map_state( $request->{status} );
my $old_state = $p->state;
my $external_status_code = $request->{external_status_code} || '';
+ my $customer_reference = $request->{customer_reference} || '';
my $old_external_status_code = $p->get_extra_metadata('external_status_code') || '';
my $comment = $self->schema->resultset('Comment')->new(
{
@@ -143,6 +144,12 @@ sub update_comments {
$p->set_extra_metadata(external_status_code => $external_status_code);
}
+ # if the customer reference to display in the report metadata is
+ # not the same as the external_id
+ if ( $customer_reference ) {
+ $p->set_extra_metadata( customer_reference => $customer_reference );
+ }
+
$open311->add_media($request->{media_url}, $comment)
if $request->{media_url};