UK. Generic problems_clause for two-tier councils

Replace copy-pasted problems_cause declarations in Hart,
Oxfordshire, and East Sussex with a generic override in
UKCouncils.pm (as a bonus also overrides Stevenage)

4 files changed, 9 insertions, 21 deletions

diff --git a/perllib/FixMyStreet/Cobrand/EastSussex.pm b/perllib/FixMyStreet/Cobrand/EastSussex.pm
index c0965037c..5081d13e8 100644
--- a/perllib/FixMyStreet/Cobrand/EastSussex.pm
+++ b/perllib/FixMyStreet/Cobrand/EastSussex.pm
@@ -10,14 +10,6 @@ sub council_name { return 'East Sussex County Council'; }
 sub council_url { return 'eastsussex'; }
 sub is_two_tier { return 1; }
 
-# Different to councils parent due to this being a two-tier council.
-# This is now specialised for Hart, Oxfordshire, ESCC, and should
-# be genericised in the parent...
-# see https://github.com/mysociety/FixMyStreet-Commercial/issues/603
-sub problems_clause {
-    return { bodies_str => { like => '%2224%' } };
-}
-
 sub path_to_web_templates {
     my $self = shift;
     return [
diff --git a/perllib/FixMyStreet/Cobrand/Hart.pm b/perllib/FixMyStreet/Cobrand/Hart.pm
index adccfce67..185539cb6 100644
--- a/perllib/FixMyStreet/Cobrand/Hart.pm
+++ b/perllib/FixMyStreet/Cobrand/Hart.pm
@@ -10,12 +10,6 @@ sub council_name { return 'Hart Council'; }
 sub council_url { return 'hart'; }
 sub is_two_tier { return 1; }
 
-# Different to councils parent due to this being a two-tier council. If we get
-# more, this can be genericised in the parent.
-sub problems_clause {
-    return { bodies_str => { like => '%2333%' } };
-}
-
 sub disambiguate_location {
     my $self    = shift;
     my $string  = shift;
diff --git a/perllib/FixMyStreet/Cobrand/Oxfordshire.pm b/perllib/FixMyStreet/Cobrand/Oxfordshire.pm
index 186c9c142..44b3a0fa9 100644
--- a/perllib/FixMyStreet/Cobrand/Oxfordshire.pm
+++ b/perllib/FixMyStreet/Cobrand/Oxfordshire.pm
@@ -15,12 +15,6 @@ sub base_url {
     return 'http://fixmystreet.oxfordshire.gov.uk';
 }
 
-# Different to councils parent due to this being a two-tier council. If we get
-# more, this can be genericised in the parent.
-sub problems_clause {
-    return { bodies_str => { like => '%2237%' } };
-}
-
 sub enter_postcode_text {
     my ($self) = @_;
     return 'Enter an Oxfordshire postcode, or street name and area';
diff --git a/perllib/FixMyStreet/Cobrand/UKCouncils.pm b/perllib/FixMyStreet/Cobrand/UKCouncils.pm
index c4e33a3c1..73132212a 100644
--- a/perllib/FixMyStreet/Cobrand/UKCouncils.pm
+++ b/perllib/FixMyStreet/Cobrand/UKCouncils.pm
@@ -27,7 +27,15 @@ sub restriction {
 # Different function to site_restriction due to two-tier use
 sub problems_clause {
     my $self = shift;
-    return { bodies_str => sprintf('%d', $self->council_id) };
+
+    if ($self->is_two_tier) {
+        return { bodies_str => {
+            like => ('%' . $self->council_id . '%')
+        }};
+    }
+    else {
+        return { bodies_str => sprintf('%d', $self->council_id) };
+    }
 }
 
 sub problems {