defined(@array) is deprecated
gray
11 years ago
5 | 5 | my $geo = Geo::Distance->new; |
6 | 6 | isa_ok $geo, 'Geo::Distance', 'new'; |
7 | 7 | can_ok 'Geo::Distance', qw(distance formula); |
8 | ok defined @Geo::Distance::XS::FORMULAS; | |
9 | cmp_ok scalar @Geo::Distance::XS::FORMULAS, '>', 2; | |
8 | cmp_ok scalar @Geo::Distance::XS::FORMULAS, '>', 2, '@FORMULAS exists'; | |
10 | 9 | |
11 | 10 | done_testing; |