Changeset 4090 for lang/perl/Geo-Coordinates-Converter-iArea

Timestamp:

01/06/08 05:45:06 (5 years ago)

Author:

yappo

Message:

lang/perl/Geo-Coordinates-Converter-iArea/: created Format-iArea brance

Location:

lang/perl/Geo-Coordinates-Converter-iArea/branches/Format-iArea

Files:

• . (copied) (copied from lang/perl/Geo-Coordinates-Converter-iArea/trunk)
• MANIFEST (modified) (2 diffs)
• lib/Geo/Coordinates/Converter/Format (added)
• lib/Geo/Coordinates/Converter/Format/IArea.pm (added)
• lib/Geo/Coordinates/Converter/iArea.pm (modified) (1 diff)
• t/02_format.t (added)

lang/perl/Geo-Coordinates-Converter-iArea/branches/Format-iArea/MANIFEST

@@ -18 +18 @@
 inc/Test/Builder/Module.pm
 inc/Test/More.pm
+lib/Geo/Coordinates/Converter/Format/IArea.pm
 lib/Geo/Coordinates/Converter/iArea.pm
 Makefile.PL
@@ -26 +27 @@
 t/00_compile.t
 t/01_simple.t
+t/02_format.t

lang/perl/Geo-Coordinates-Converter-iArea/branches/Format-iArea/lib/Geo/Coordinates/Converter/iArea.pm

@@ -15 +15 @@
         if (index($line, $areacode) >= 0) {
             my @dat = split m{,}, $line;
-
             $geo = Geo::Coordinates::Converter->new(
                 lat    => $dat[1],