mirror of
https://git.freebsd.org/ports.git
synced 2025-07-18 01:39:16 -04:00
Update to 0.11
PR: 87486 Submitted by: Rod Taylor <ports@rbt.ca> (maintainer)
This commit is contained in:
parent
72d98ca4de
commit
f99bd7c56a
Notes:
svn2git
2021-03-31 03:12:20 +00:00
svn path=/head/; revision=145467
3 changed files with 11 additions and 56 deletions
|
@ -6,8 +6,7 @@
|
|||
#
|
||||
|
||||
PORTNAME= Geo-Distance
|
||||
PORTVERSION= 0.06
|
||||
PORTREVISION= 1
|
||||
PORTVERSION= 0.11
|
||||
CATEGORIES= math perl5
|
||||
MASTER_SITES= ${MASTER_SITE_PERL_CPAN}
|
||||
MASTER_SITE_SUBDIR= Geo
|
||||
|
@ -18,6 +17,13 @@ COMMENT= Calculate Distances and Closest Locations
|
|||
|
||||
PERL_CONFIGURE= yes
|
||||
|
||||
.include <bsd.port.pre.mk>
|
||||
|
||||
# Module from CPAN written for 5.6 or later
|
||||
.if ${PERL_LEVEL} < 500600
|
||||
IGNORE= Port requires perl 5.6.x or later. Install lang/perl5.8 then try again
|
||||
.endif
|
||||
|
||||
MAN3= Geo::Distance.3
|
||||
|
||||
.include <bsd.port.mk>
|
||||
.include <bsd.port.post.mk>
|
||||
|
|
|
@ -1,2 +1,2 @@
|
|||
MD5 (Geo-Distance-0.06.tar.gz) = 6313eb1cdabca80d494d213db1aa94c0
|
||||
SIZE (Geo-Distance-0.06.tar.gz) = 9234
|
||||
MD5 (Geo-Distance-0.11.tar.gz) = d7bd2b67a3d3e233fa79be5c1b3f7352
|
||||
SIZE (Geo-Distance-0.11.tar.gz) = 9684
|
||||
|
|
|
@ -1,51 +0,0 @@
|
|||
--- ../../../Geo-Distance-0.06/Distance.pm Wed Jun 30 02:12:10 2004
|
||||
+++ Distance.pm Sun Jul 11 21:46:44 2004
|
||||
@@ -1,21 +1,20 @@
|
||||
package Geo::Distance;
|
||||
|
||||
-use 5.006;
|
||||
use strict;
|
||||
-use warnings;
|
||||
use Carp;
|
||||
use Math::Trig qw( great_circle_distance deg2rad );
|
||||
|
||||
require Exporter;
|
||||
-our @ISA = qw(Exporter);
|
||||
-our %EXPORT_TAGS = ( 'all' => [ qw(
|
||||
+use vars qw(@ISA %EXPORT_TAGS @EXPORT_OK $VERSION);
|
||||
+@ISA = qw(Exporter);
|
||||
+%EXPORT_TAGS = ( 'all' => [ qw(
|
||||
&distance
|
||||
&distance_calc
|
||||
&find_closest
|
||||
®_unit
|
||||
&formula
|
||||
) ] );
|
||||
-our @EXPORT_OK = (
|
||||
+@EXPORT_OK = (
|
||||
@{ $EXPORT_TAGS{'all'} },
|
||||
'&distance',
|
||||
'&distance_calc',
|
||||
@@ -23,11 +22,11 @@
|
||||
'®_unit',
|
||||
'&formula'
|
||||
);
|
||||
-our $VERSION = '0.06';
|
||||
+$VERSION = '0.06';
|
||||
|
||||
|
||||
# See Math::Trig for what $rho is.
|
||||
-our(%rho,$formula);
|
||||
+use vars qw(%rho $formula);
|
||||
$rho{kilometer} = 6378; # Derived from the Math::Trig POD on the 'great_circle_distance'.
|
||||
$rho{meter} = $rho{kilometer}*1000; # 1000 meters in one kilometer.
|
||||
$rho{centimeter} = $rho{meter}*100; # 100 centimeters in one meter.
|
||||
@@ -41,7 +40,7 @@
|
||||
# Number of units in a single degree (lat or lon) at the equator.
|
||||
# Derived from doing dirty_distance('kilometer',10,0,11,0) = 111.317099692185
|
||||
# Then dividing that by $unit{kilometer} = 6378
|
||||
-our $deg_ratio = 0.01745329252;
|
||||
+use vars qw($deg_ratio); $deg_ratio = 0.01745329252;
|
||||
|
||||
|
||||
# New Object Constructor
|
Loading…
Add table
Reference in a new issue