From 7cf46ee96e224095a7f2adb925f2b4ff16eb63e7 Mon Sep 17 00:00:00 2001 From: Edmund von der Burg Date: Tue, 8 Feb 2011 11:14:26 -0300 Subject: convert various map functions --- perllib/Problems.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'perllib/Problems.pm') diff --git a/perllib/Problems.pm b/perllib/Problems.pm index 7a4c4974e..8a142a0a3 100644 --- a/perllib/Problems.pm +++ b/perllib/Problems.pm @@ -170,21 +170,21 @@ sub front_stats { # Problems around a location sub around_map { - my ($min_e, $max_e, $min_n, $max_n, $interval, $limit) = @_; + my ($min_lat, $max_lat, $min_lon, $max_lon, $interval, $limit) = @_; my $limit_clause = ''; if ($limit) { $limit_clause = " limit $limit"; } mySociety::Locale::in_gb_locale { select_all( - "select id,title,easting,northing,state, + "select id,title,latitude,longitude,state, extract(epoch from confirmed) as time from problem where state in ('confirmed', 'fixed') - and easting>=? and easting=? and northing=? and latitude=? and longitude