diff options
| author | Matthew Somerville <matthew@mysociety.org> | 2020-03-09 13:28:31 +0000 |
|---|---|---|
| committer | Matthew Somerville <matthew@mysociety.org> | 2020-03-09 15:42:40 +0000 |
| commit | 468e81212c9a15f25a3ae6bf9c94505f02cdc7e7 (patch) | |
| tree | 6150ee30feb65cd6697add9a868773187cf63afd /perllib/FixMyStreet/Map | |
| parent | 630ad091519dff8aa9371502005fbb788d349632 (diff) | |
A number of warnfixes in tests.
Diffstat (limited to 'perllib/FixMyStreet/Map')
| -rw-r--r-- | perllib/FixMyStreet/Map/UKCouncilWMTS.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/Map/UKCouncilWMTS.pm b/perllib/FixMyStreet/Map/UKCouncilWMTS.pm index 7e3522714..53b6859bf 100644 --- a/perllib/FixMyStreet/Map/UKCouncilWMTS.pm +++ b/perllib/FixMyStreet/Map/UKCouncilWMTS.pm @@ -45,6 +45,7 @@ sub reproject_from_latlon($$$) { # Reproject a BNG easting/northing into WGS84 lat/lon sub reproject_to_latlon($$$) { my ($self, $x, $y) = @_; + return (0,0) if $x<0 || $y<0; my ($lat, $lon) = Utils::convert_en_to_latlon($x, $y); return ($lat, $lon); } |