diff options
Diffstat (limited to 'web/alert.cgi')
-rwxr-xr-x | web/alert.cgi | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/web/alert.cgi b/web/alert.cgi index 46eef082b..70b9d1873 100755 --- a/web/alert.cgi +++ b/web/alert.cgi @@ -14,6 +14,7 @@ use Digest::SHA1 qw(sha1_hex); use Error qw(:try); use CrossSell; use FixMyStreet::Alert; +use FixMyStreet::Geocode; use mySociety::AuthToken; use mySociety::Config; use mySociety::DBHandle qw(select_all); @@ -84,12 +85,12 @@ sub alert_list { $n = FixMyStreet::Map::tile_to_os($input{y}); } else { try { - ($x, $y, $e, $n, $error) = Page::geocode($input{pc}, $q); + ($x, $y, $e, $n, $error) = FixMyStreet::Geocode::lookup($input{pc}, $q); } catch Error::Simple with { $error = shift; }; } - return Page::geocode_choice($error, '/alert', $q) if ref($error) eq 'ARRAY'; + return FixMyStreet::Geocode::list_choices($error, '/alert', $q) if ref($error) eq 'ARRAY'; return alert_front_page($q, $error) if $error; my $pretty_pc = $input_h{pc}; |