This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Upgrade Socket to 2.004
authorSteve Hay <steve.m.hay@googlemail.com>
Wed, 15 Aug 2012 22:59:29 +0000 (23:59 +0100)
committerSteve Hay <steve.m.hay@googlemail.com>
Wed, 15 Aug 2012 22:59:29 +0000 (23:59 +0100)
Porting/Maintainers.pl
cpan/Socket/Socket.pm
cpan/Socket/t/ip_mreq.t
pod/perldelta.pod

index 54ed2e6..9109dfd 100755 (executable)
@@ -1640,7 +1640,7 @@ use File::Glob qw(:case);
 
     'Socket' => {
         'MAINTAINER'   => 'pevans',
-        'DISTRIBUTION' => 'PEVANS/Socket-2.003.tar.gz',
+        'DISTRIBUTION' => 'PEVANS/Socket-2.004.tar.gz',
         'FILES'        => q[cpan/Socket],
         'UPSTREAM'     => 'cpan',
     },
index d9bbfae..83729b2 100644 (file)
@@ -3,7 +3,7 @@ package Socket;
 use strict;
 { use 5.006001; }
 
-our $VERSION = '2.003';
+our $VERSION = '2.004';
 
 =head1 NAME
 
index 2a99509..2ed7606 100644 (file)
@@ -31,7 +31,7 @@ is( (unpack_ip_mreq pack_ip_mreq "\xe0\0\0\1")[1], INADDR_ANY, 'pack_ip_mreq int
 
 SKIP: {
     my $mreq;
-    skip 3, "No pack_ip_mreq_source" unless defined eval { $mreq = pack_ip_mreq_source "\xe0\0\0\2", "\x0a\0\0\1", INADDR_ANY };
+    skip "No pack_ip_mreq_source", 3 unless defined eval { $mreq = pack_ip_mreq_source "\xe0\0\0\2", "\x0a\0\0\1", INADDR_ANY };
 
     @unpacked = unpack_ip_mreq_source $mreq;
 
index 59f4e4a..3765239 100644 (file)
@@ -213,7 +213,7 @@ brackets, i.e. C</s/> or C</s/i>.
 
 =item *
 
-L<Socket> has been upgraded from version 2.002 to 2.003.  Constants and
+L<Socket> has been upgraded from version 2.002 to 2.004.  Constants and
 functions required for IP multicast source group membership have been added.
 
 =item *