Pear-Trading/Foodloop-Server
Archived
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Added transaction distance calculation

Browse source
This commit is contained in:
Tom Bloor 2017-10-03 18:08:30 +01:00
parent 37e8f0b46a
commit 62881a0eda
5 changed files with 75 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

20
lib/Pear/LocalLoop/Plugin/Postcodes.pm
View file

@ -1,7 +1,8 @@
package Pear::LocalLoop::Plugin::Postcodes;
use Mojo::Base 'Mojolicious::Plugin';
use DateTime::Format::Strptime;
use Geo::UK::Postcode::Regex;
use GIS::Distance;
sub register {
my ( $plugin, $app, $conf ) = @_;
@ -35,6 +36,23 @@ sub register {
}
return $location;
});
$app->helper( get_distance_from_coords => sub {
my ( $c, $buyer, $seller ) = @_;
my $gis = GIS::Distance->new();
my $buyer_lat = $buyer->latitude;
my $buyer_long = $buyer->longitude;
my $seller_lat = $seller->latitude;
my $seller_long = $seller->longitude;
if ( $buyer_lat && $buyer_long
&& $seller_lat && $seller_long ) {
return int( $gis->distance( $buyer_lat, $buyer_long => $seller_lat, $seller_long )->meters );
}
return;
});
}
1;