diff options
author | Matthew Somerville <matthew@mysociety.org> | 2011-06-17 23:09:05 +0100 |
---|---|---|
committer | Matthew Somerville <matthew@mysociety.org> | 2011-06-17 23:09:05 +0100 |
commit | 349b9f813f07da61ca117f49d1a3746979dffac8 (patch) | |
tree | 9661963edc9187063a97f8d4930c71bb17698e24 /perllib/FixMyStreet/App/Controller/Reports.pm | |
parent | 5153ba514d7f4d8889ad55e8b1b7b18da63644d2 (diff) |
Centralise UK location check to catch edge cases.
Diffstat (limited to 'perllib/FixMyStreet/App/Controller/Reports.pm')
-rw-r--r-- | perllib/FixMyStreet/App/Controller/Reports.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Reports.pm b/perllib/FixMyStreet/App/Controller/Reports.pm index e1983c855..a3aeb8505 100644 --- a/perllib/FixMyStreet/App/Controller/Reports.pm +++ b/perllib/FixMyStreet/App/Controller/Reports.pm @@ -168,6 +168,7 @@ sub council_check : Private { my ( $self, $c, $q_council ) = @_; $q_council =~ s/\+/ /g; + $q_council =~ s/\.html//; # Manual misspelling redirect if ($q_council =~ /^rhondda cynon taff$/i) { @@ -224,6 +225,8 @@ sub ward_check : Private { my ( $self, $c, $ward ) = @_; $ward =~ s/\+/ /g; + $ward =~ s/\.html//; + my $council = $c->stash->{council}; my $qw = mySociety::MaPit::call('areas', $ward, |