Changeset 877

Show
Ignore:
Timestamp:
11/19/06 18:56:52 (2 years ago)
Author:
dom
Message:

Geo::HelmertTransform? is now in CPAN, and required (closes #89)

Location:
trunk
Files:
3 modified

Legend:

Unmodified
Added
Removed

  • trunk/Build.PL

    r854 r877  
    250250        'File::Temp'                          => 0, 
    251251        'Geography::NationalGrid'             => 0, 
     252        'Geo::HelmertTransform'               => 0, 
    252253        'LWP::Simple'                         => 0, 
    253254        'Parse::RecDescent'                   => 0, 

  • trunk/PREREQUISITES

    r854 r877  
    3434  Geo::Coordinates::UTM 
    3535) 
     36Geo::HelmertTransform 
    3637LWP::Simple 
    3738Module::Build (version 0.18 or later) 

  • trunk/lib/OpenGuides/Utils.pm

    r872 r877  
    255255            $helmert = sub($$$) { 
    256256                my ($datum,$oldlat,$oldlong) = @_; 
     257                if ($datum eq 'Airy') { 
     258                    $datum = 'Airy1830'; 
     259                } 
    257260                my $datum_helper = new Geo::HelmertTransform::Datum(Name=>$datum); 
    258261                my $wgs84_helper = new Geo::HelmertTransform::Datum(Name=>'WGS84');