Blame perl-Net-IP-1.25-bz197425.patch
|
jvdias |
a720b89 |
--- Net-IP-1.25/IP.pm.bz197425 2006-05-22 12:46:40.000000000 -0400
|
|
jvdias |
a720b89 |
+++ Net-IP-1.25/IP.pm 2006-07-05 15:20:26.000000000 -0400
|
|
jvdias |
a720b89 |
@@ -410,7 +410,7 @@
|
|
jvdias |
a720b89 |
|
|
jvdias |
a720b89 |
my $int = ip_bintoint($self->binip());
|
|
jvdias |
a720b89 |
|
|
jvdias |
a720b89 |
- if (!$int) {
|
|
jvdias |
a720b89 |
+ if (ref($int) ne "Math::BigInt") {
|
|
jvdias |
a720b89 |
$self->{error} = $ERROR;
|
|
jvdias |
a720b89 |
$self->{errno} = $ERRNO;
|
|
jvdias |
a720b89 |
return;
|