aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/FixMyStreet/Map/OSM.pm
diff options
context:
space:
mode:
authorMatthew Somerville <matthew@fury.ukcod.org.uk>2011-03-04 17:31:43 +0000
committerMatthew Somerville <matthew@fury.ukcod.org.uk>2011-03-04 17:31:43 +0000
commit71a81d5c371f737b75ab087d618b75b3986a57d5 (patch)
treea7cef4a3dbe7b20f2120e2719a540f779f0a3b0e /perllib/FixMyStreet/Map/OSM.pm
parenteac621cd9add21d7f6e5e3c3953f9c920d3b388e (diff)
Allow lat/lon in query string to affect map location (for non-JS browsing of map on report page).
Diffstat (limited to 'perllib/FixMyStreet/Map/OSM.pm')
-rw-r--r--perllib/FixMyStreet/Map/OSM.pm4
1 files changed, 4 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/Map/OSM.pm b/perllib/FixMyStreet/Map/OSM.pm
index fb3770d23..039e1b3ee 100644
--- a/perllib/FixMyStreet/Map/OSM.pm
+++ b/perllib/FixMyStreet/Map/OSM.pm
@@ -32,6 +32,10 @@ sub display_map {
$params{pre} ||= '';
$params{post} ||= '';
+ # Map centre may be overridden in the query string
+ $params{latitude} = $q->param('lat')+0 if defined $q->param('lat');
+ $params{longitude} = $q->param('lon')+0 if defined $q->param('lon');
+
my $zoom = defined $q->param('zoom') ? $q->param('zoom') : 2;
my $zoom_act = 14 + $zoom;
my ($x_tile, $y_tile) = latlon_to_tile_with_adjust($params{latitude}, $params{longitude}, $zoom_act);