diff options
author | Struan Donald <struan@exo.org.uk> | 2011-05-06 10:44:22 +0100 |
---|---|---|
committer | Struan Donald <struan@exo.org.uk> | 2011-05-06 10:44:22 +0100 |
commit | 9787559f918a136da3096d05abbb7430731ecaa9 (patch) | |
tree | e2385a4cac11afbe8e9006a3d070e35cccd05852 | |
parent | 78fed17f404cb4b3b90ba99edeefeaf8f4c25898 (diff) |
truncate lat/lon
-rw-r--r-- | perllib/FixMyStreet/App/Controller/Alert.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Alert.pm b/perllib/FixMyStreet/App/Controller/Alert.pm index db2d06844..b62f8df2a 100644 --- a/perllib/FixMyStreet/App/Controller/Alert.pm +++ b/perllib/FixMyStreet/App/Controller/Alert.pm @@ -87,8 +87,9 @@ sub list :Path('list') :Args(0) { $c->forward('prettify_pc'); -# # truncate the lat,lon for nicer urls -# ( $lat, $lon ) = map { Utils::truncate_coordinate($_) } ( $lat, $lon ); + # truncate the lat,lon for nicer urls + ( $c->stash->{latitude}, $c->stash->{longitude} ) = map { Utils::truncate_coordinate($_) } ( $c->stash->{latitude}, $c->stash->{longitude} ); + $c->log->debug( $_ ) for ( $c->stash->{pc}, $c->stash->{latitude}, $c->stash->{longitude} ); # # my $errors = ''; # $errors = '<ul class="error"><li>' . join('</li><li>', @errors) . '</li></ul>' if @errors; |