diff options
Diffstat (limited to 'cpan')
| -rw-r--r-- | cpan/Socket/Socket.pm | 2 | ||||
| -rw-r--r-- | cpan/Socket/Socket.xs | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/cpan/Socket/Socket.pm b/cpan/Socket/Socket.pm index c0dc4aa7dd..a3a38d9f81 100644 --- a/cpan/Socket/Socket.pm +++ b/cpan/Socket/Socket.pm @@ -3,7 +3,7 @@ package Socket; use strict; { use 5.006001; } -our $VERSION = '2.006'; +our $VERSION = '2.006_001'; =head1 NAME diff --git a/cpan/Socket/Socket.xs b/cpan/Socket/Socket.xs index e99eac12ef..4bfaada2f1 100644 --- a/cpan/Socket/Socket.xs +++ b/cpan/Socket/Socket.xs @@ -916,13 +916,13 @@ inet_ntop(af, ip_address_sv) case AF_INET: if(addrlen != 4) croak("Bad address length for Socket::inet_ntop on AF_INET;" - " got %d, should be 4"); + " got %d, should be 4", addrlen); break; #ifdef AF_INET6 case AF_INET6: if(addrlen != 16) croak("Bad address length for Socket::inet_ntop on AF_INET6;" - " got %d, should be 16"); + " got %d, should be 16", addrlen); break; #endif default: |