Patch applied and new module released.
Please wait 24 hours to allow CPAN to upgrade.
--
Yen-Ming Lee <le...@leeym.com>
2011/1/18 <jida...@jidanni.org>:
> X-debbugs-Cc: le...@leeym.com
> Package: libgeography-nationalgrid-perl
> Version: 1.6-10
> Severity: wishlist
> Tags: patch
> File: /usr/share/man/man3/Geography::NationalGrid::TW.3pm.gz
>
>> $point1->transform('TWD67');
> Why do you throw the results away?!
>
> Here, I rewrote it for you.
>
> diff -U0 /tmp/Geography\:\:NationalGrid\:\:TW.3pm
> /tmp/Geography\:\:NationalGrid\:\:TW.3pm.NEW
> --- /tmp/Geography::NationalGrid::TW.3pm 2011-01-18 20:32:37.278987000
> +0800
> +++ /tmp/Geography::NationalGrid::TW.3pm.NEW 2011-01-18 20:34:18.734986000
> +0800
> @@ -143 +143 @@
> -\& my $point1 = new Geography::NationalGrid::TW(
> +\& my $point97 = new Geography::NationalGrid::TW(
> @@ -147,2 +147,2 @@
> -\& printf("Point 1 is %f X and %f Y\en", $point1\->easting,
> $point1\->northing);
> -\& printf("Point 1 is %f N and %f E\en", $point1\->latitude,
> $point1\->longitude);
> +\& printf("Point 97 is %f X and %f Y\en", $point97\->easting,
> $point97\->northing);
> +\& printf("Point 97 is %f N and %f E\en", $point97\->latitude,
> $point97\->longitude);
> @@ -150 +150 @@
> -\& $point1\->transform(\*(AqTWD67\*(Aq);
> +\& my $point67 = $point97\->transform(\*(AqTWD67\*(Aq);
>
>
>
--
To UNSUBSCRIBE, email to debian-bugs-dist-requ...@lists.debian.org
with a subject of "unsubscribe". Trouble? Contact listmas...@lists.debian.org
