aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/Open311/PopulateServiceList.pm
diff options
context:
space:
mode:
authorStruan Donald <struan@exo.org.uk>2011-10-11 09:41:04 +0100
committerStruan Donald <struan@exo.org.uk>2011-10-11 09:41:04 +0100
commitbd24d2a0365e65cd6b0bc3623f2d7c16a5e4269a (patch)
tree6a49912282ccc3681af0878f24226bdf6484c275 /perllib/Open311/PopulateServiceList.pm
parent100779cc2b4a344d13edd1f47756db926567d69a (diff)
handle change of service name for existing service code
Diffstat (limited to 'perllib/Open311/PopulateServiceList.pm')
-rw-r--r--perllib/Open311/PopulateServiceList.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perllib/Open311/PopulateServiceList.pm b/perllib/Open311/PopulateServiceList.pm
index 8a5a14a92..ce5e678c0 100644
--- a/perllib/Open311/PopulateServiceList.pm
+++ b/perllib/Open311/PopulateServiceList.pm
@@ -91,7 +91,7 @@ sub process_service {
}
}
-# FIXME - handle change of service name or service code
+# FIXME - handle change of service code
sub _handle_existing_contact {
my ( $self, $contact ) = @_;
@@ -100,7 +100,7 @@ sub _handle_existing_contact {
print $self->_current_council->area_id . " already has a contact for service code " . $self->_current_service->{service_code} . "\n";
push @{ $self->found_contacts }, $self->_current_service->{service_code};
- if ( $contact->deleted ) {
+ if ( $contact->deleted || $service_name ne $contact->category ) {
$contact->update(
{
category => $service_name,