From 142d049ca8568a9b18f7fea19581e82cbbd97f30 Mon Sep 17 00:00:00 2001 From: matthew Date: Mon, 10 Aug 2009 12:24:05 +0000 Subject: Welsh address, FAQ update, maps link. --- web/index.cgi | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) (limited to 'web/index.cgi') diff --git a/web/index.cgi b/web/index.cgi index 3ad592cfa..ec02d9a40 100755 --- a/web/index.cgi +++ b/web/index.cgi @@ -6,7 +6,7 @@ # Copyright (c) 2006 UK Citizens Online Democracy. All rights reserved. # Email: matthew@mysociety.org. WWW: http://www.mysociety.org # -# $Id: index.cgi,v 1.260 2009-07-17 15:03:02 matthew Exp $ +# $Id: index.cgi,v 1.261 2009-08-10 12:24:06 matthew Exp $ use strict; use Standard; @@ -23,6 +23,7 @@ use mySociety::AuthToken; use mySociety::Config; use mySociety::DBHandle qw(select_all); use mySociety::EmailUtil; +use mySociety::GeoUtil; use mySociety::Locale; use mySociety::MaPit; use mySociety::PostcodeUtil; @@ -793,7 +794,7 @@ sub display_location { $hide_link = NewURL($q, -retain=>1, no_pins=>1); $hide_text = _('Hide pins'); } - my $map_links = "

$hide_text | $all_text

"; + my $map_links = " "; my $out = Page::display_map($q, x => $x, y => $y, type => 1, pins => $pins, post => $map_links ); $out .= $q->h1(_('Problems in this area')); @@ -894,9 +895,13 @@ sub display_problem { my $out = ''; + my ($lat, $lon) = mySociety::GeoUtil::national_grid_to_wgs84($problem->{easting}, $problem->{northing}, 'G'); + my $map_links = ""; + my $pins = Page::display_pin($q, $px, $py, 'blue'); $out .= Page::display_map($q, x => $x_tile, y => $y_tile, type => 0, - pins => $pins, px => $px, py => $py ); + pins => $pins, px => $px, py => $py, post => $map_links ); if ($q->{site} ne 'emptyhomes' && $problem->{state} eq 'confirmed' && $problem->{duration} > 8*7*24*60*60) { $out .= $q->p({id => 'unknown'}, _('This problem is old and of unknown status.')) } -- cgit v1.2.3