@@ -1,5 +1,8 @@
Revision history for Perl extension Data::Validate.
+0.9 20140426
+ - Added fix for longdouble bug (RT 63213) provided by Mark Hedges
+
0.8 20070310
- added version prereq for Math::BigInt
@@ -1,12 +1,23 @@
-# http://module-build.sourceforge.net/META-spec.html
-#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX#
-name: Data-Validate
-version: 0.08
-version_from: Validate.pm
-installdirs: site
+--- #YAML:1.0
+name: Data-Validate
+version: 0.09
+abstract: ~
+author:
+ - Richard Sonnen (sonnen@richardsonnen.com)
+license: unknown
+distribution_type: module
+configure_requires:
+ ExtUtils::MakeMaker: 0
+build_requires:
+ ExtUtils::MakeMaker: 0
requires:
- Math::BigInt: 1.77
- POSIX: 0
-
-distribution_type: module
-generated_by: ExtUtils::MakeMaker version 6.23
+ Math::BigInt: 1.77
+ POSIX: 0
+no_index:
+ directory:
+ - t
+ - inc
+generated_by: ExtUtils::MakeMaker version 6.55_02
+meta-spec:
+ url: http://module-build.sourceforge.net/META-spec-v1.4.html
+ version: 1.4
@@ -9,6 +9,7 @@ use AutoLoader 'AUTOLOAD';
use POSIX;
use Scalar::Util qw(looks_like_number);
use Math::BigInt;
+use Config;
@ISA = qw(Exporter);
@@ -38,7 +39,7 @@ use Math::BigInt;
string => [qw(is_equal_to is_alphanumeric is_printable length_is_between)],
);
-$VERSION = '0.08';
+$VERSION = '0.09';
# No preloads
@@ -177,7 +178,7 @@ sub is_integer{
# can do this for us, but defeats the purpose of being
# lightweight. So, we're going to try a huristic method to choose
# how to test for integernesss
- if(length($int) > 10){
+ if(!$Config{uselongdouble} && length($int) > 10){
my $i = Math::BigInt->new($value);
return unless $i->is_int();