diff options
| author | Dave Arter <davea@mysociety.org> | 2016-06-29 11:07:36 +0100 |
|---|---|---|
| committer | Dave Arter <davea@mysociety.org> | 2016-07-07 11:28:33 +0100 |
| commit | 5b9670512542f54588cc89f2eefc943db26b9ee2 (patch) | |
| tree | b929b12826b3a916e68003559a222bd62f4ac53f /perllib/FixMyStreet/DB/Result/Problem.pm | |
| parent | 6d3cbb5d58c0297959c541da50faaf39884ffe1c (diff) | |
[Zurich] Use new LV95/CH1903+ geocoder and base map tiles
- Use new `getLocation95` method for geocoding addresses
- Replace Coordinates::CH1903 with Coordinates::CH1903Plus
- Refactor Map::Zurich to use WMTSBase instead of duplicating code
- Slightly refactor map templates to make using custom WMTS tiles easier
- Use correct sizes for marker pins on maps
Closes mysociety/FixMyStreet-Commercial#769.
Closes mysociety/FixMyStreet-Commercial#768.
Diffstat (limited to 'perllib/FixMyStreet/DB/Result/Problem.pm')
| -rw-r--r-- | perllib/FixMyStreet/DB/Result/Problem.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/DB/Result/Problem.pm b/perllib/FixMyStreet/DB/Result/Problem.pm index b58294604..a2167032a 100644 --- a/perllib/FixMyStreet/DB/Result/Problem.pm +++ b/perllib/FixMyStreet/DB/Result/Problem.pm @@ -668,7 +668,7 @@ sub local_coords { my $self = shift; my $cobrand = FixMyStreet::Cobrand->get_class_for_moniker($self->cobrand)->new; if ($cobrand->moniker eq 'zurich') { - my ($x, $y) = Geo::Coordinates::CH1903::from_latlon($self->latitude, $self->longitude); + my ($x, $y) = Geo::Coordinates::CH1903Plus::from_latlon($self->latitude, $self->longitude); return ( int($x+0.5), int($y+0.5) ); } elsif ($cobrand->country eq 'GB') { my $coordsyst = 'G'; |