aboutsummaryrefslogtreecommitdiffstats
path: root/t/cobrand/bromley.t
diff options
context:
space:
mode:
authorMatthew Somerville <matthew-github@dracos.co.uk>2018-06-20 08:04:28 +0100
committerMatthew Somerville <matthew-github@dracos.co.uk>2018-06-20 08:04:28 +0100
commit873ea570cc429b378eb33c8de90570a10414264c (patch)
tree094b86743e3e0267ec04fb36cb3f2245d402f163 /t/cobrand/bromley.t
parent85ae59fdd1d8690efc569a193853072eb2519c89 (diff)
parente133cdcfda4b25e3fd04db6febf663009add05bc (diff)
Merge branch 'issues/commercial/1064-main-road-br5'
Diffstat (limited to 't/cobrand/bromley.t')
-rw-r--r--t/cobrand/bromley.t17
1 files changed, 17 insertions, 0 deletions
diff --git a/t/cobrand/bromley.t b/t/cobrand/bromley.t
index d62a0ad0f..6ee4be282 100644
--- a/t/cobrand/bromley.t
+++ b/t/cobrand/bromley.t
@@ -194,4 +194,21 @@ subtest 'check display of TfL reports' => sub {
$mech->content_like(qr{<a title="Test Test[^>]*bromley.example.org[^>]*><img[^>]*yellow});
};
+subtest 'check geolocation overrides' => sub {
+ my $cobrand = FixMyStreet::Cobrand::Bromley->new;
+ foreach my $test (
+ { query => 'Main Rd, BR1', town => 'Bromley', string => 'Main Rd' },
+ { query => 'Main Rd, BR3', town => 'Beckenham', string => 'Main Rd' },
+ { query => 'Main Rd, BR4', town => 'West Wickham', string => 'Main Rd' },
+ { query => 'Main Rd, BR5', town => 'Orpington', string => 'Main Rd' },
+ { query => 'Main Rd, BR7', town => 'Chislehurst', string => 'Main Rd' },
+ { query => 'Main Rd, BR8', town => 'Swanley', string => 'Main Rd' },
+ { query => 'Old Priory Avenue', town => 'BR6 0PL', string => 'Old Priory Avenue' },
+ ) {
+ my $res = $cobrand->disambiguate_location($test->{query});
+ is $res->{town}, $test->{town}, "Town matches $test->{town}";
+ is $res->{string}, $test->{string}, "String matches $test->{string}";
+ }
+};
+
done_testing();