diff options
-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; |