diff options
| author | Struan Donald <struan@exo.org.uk> | 2012-07-30 16:59:08 +0100 |
|---|---|---|
| committer | Struan Donald <struan@exo.org.uk> | 2012-08-09 09:58:37 +0100 |
| commit | f7e6c593e8c3807348529b6b984d944462270ee0 (patch) | |
| tree | abeff6a2c789de837d5ef8e766cbe838176d3324 /perllib/FixMyStreet/Cobrand/Bromley.pm | |
| parent | f7c175d06dde929855ababb3e82d3f607b86133d (diff) | |
add partial postcode for bromley high street lookup to help bing
Diffstat (limited to 'perllib/FixMyStreet/Cobrand/Bromley.pm')
| -rw-r--r-- | perllib/FixMyStreet/Cobrand/Bromley.pm | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/perllib/FixMyStreet/Cobrand/Bromley.pm b/perllib/FixMyStreet/Cobrand/Bromley.pm index 026a56feb..21c7d31d6 100644 --- a/perllib/FixMyStreet/Cobrand/Bromley.pm +++ b/perllib/FixMyStreet/Cobrand/Bromley.pm @@ -31,10 +31,18 @@ sub site_name { } sub disambiguate_location { - my $self = shift; + my $self = shift; + my $string = shift; + + my $town = 'Bromley'; + # Bing turns High St Bromley into Bromley High St which is in + # Bromley by Bow. + if ( $string =~ /high\+st/i ) { + $town .= ', BR1'; + } return { %{ $self->SUPER::disambiguate_location() }, - town => 'Bromley', + town => $town, centre => '51.366836,0.040623', span => '0.154963,0.24347', bounds => [ 51.289355, -0.081112, 51.444318, 0.162358 ], |