r57091 - in /branches/upstream/libio-socket-multicast-perl/current: Changes META.yml README lib/IO/Socket/Multicast.pm t/03_multicast.t
ansgar-guest at users.alioth.debian.org
ansgar-guest at users.alioth.debian.org
Thu Apr 29 09:08:59 UTC 2010
Author: ansgar-guest
Date: Thu Apr 29 09:08:44 2010
New Revision: 57091
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=57091
Log:
[svn-upgrade] Integrating new upstream version, libio-socket-multicast-perl (1.12)
Modified:
branches/upstream/libio-socket-multicast-perl/current/Changes
branches/upstream/libio-socket-multicast-perl/current/META.yml
branches/upstream/libio-socket-multicast-perl/current/README
branches/upstream/libio-socket-multicast-perl/current/lib/IO/Socket/Multicast.pm
branches/upstream/libio-socket-multicast-perl/current/t/03_multicast.t
Modified: branches/upstream/libio-socket-multicast-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libio-socket-multicast-perl/current/Changes?rev=57091&op=diff
==============================================================================
--- branches/upstream/libio-socket-multicast-perl/current/Changes (original)
+++ branches/upstream/libio-socket-multicast-perl/current/Changes Thu Apr 29 09:08:44 2010
@@ -1,4 +1,8 @@
Revision history for Perl extension IO-Socket-Multicast
+1.12 - Wed Apr 28 20:38:53 EST 2010
+ Test adjustments thankyou Christian W. (BRAMBLE)
+ Documentation updates and corrections (BRAMBLE)
+
1.11 - Wed Nov 4 13:48:18 EST 2009
More test adjustments /re Win32 (BRAMBLE)
1.09
Modified: branches/upstream/libio-socket-multicast-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libio-socket-multicast-perl/current/META.yml?rev=57091&op=diff
==============================================================================
--- branches/upstream/libio-socket-multicast-perl/current/META.yml (original)
+++ branches/upstream/libio-socket-multicast-perl/current/META.yml Thu Apr 29 09:08:44 2010
@@ -1,13 +1,21 @@
--- #YAML:1.0
-name: IO-Socket-Multicast
-version: 1.11
-abstract: Send and receive multicast messages
-license: perl
-author: ~
-generated_by: ExtUtils::MakeMaker version 6.42
-distribution_type: module
-requires:
- IO::Interface: 0.94
+name: IO-Socket-Multicast
+version: 1.12
+abstract: Send and receive multicast messages
+author: []
+license: perl
+distribution_type: module
+configure_requires:
+ ExtUtils::MakeMaker: 0
+build_requires:
+ ExtUtils::MakeMaker: 0
+requires:
+ IO::Interface: 0.94
+no_index:
+ directory:
+ - t
+ - inc
+generated_by: ExtUtils::MakeMaker version 6.56
meta-spec:
- url: http://module-build.sourceforge.net/META-spec-v1.3.html
- version: 1.3
+ url: http://module-build.sourceforge.net/META-spec-v1.4.html
+ version: 1.4
Modified: branches/upstream/libio-socket-multicast-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libio-socket-multicast-perl/current/README?rev=57091&op=diff
==============================================================================
--- branches/upstream/libio-socket-multicast-perl/current/README (original)
+++ branches/upstream/libio-socket-multicast-perl/current/README Thu Apr 29 09:08:44 2010
@@ -82,7 +82,7 @@
"udp", which is more appropriate for multicasting.
To create a UDP socket suitable for sending outgoing multicast
- messages, call new() without no arguments (or with "Proto=>'udp'").
+ messages, call new() without arguments (or with "Proto=>'udp'").
To create a UDP socket that can also receive incoming multicast
transmissions on a specific port, call new() with the LocalPort
argument.
Modified: branches/upstream/libio-socket-multicast-perl/current/lib/IO/Socket/Multicast.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libio-socket-multicast-perl/current/lib/IO/Socket/Multicast.pm?rev=57091&op=diff
==============================================================================
--- branches/upstream/libio-socket-multicast-perl/current/lib/IO/Socket/Multicast.pm (original)
+++ branches/upstream/libio-socket-multicast-perl/current/lib/IO/Socket/Multicast.pm Thu Apr 29 09:08:44 2010
@@ -20,7 +20,7 @@
mcast_dest
mcast_send
);
- $VERSION = '1.11';
+ $VERSION = '1.12';
@ISA = qw(
Exporter
DynaLoader
@@ -185,7 +185,7 @@
wishes to receive the transmissions.
To receive transmissions B<from> a multicast group, you will use
-IO::Socket::INET->new() to create a UDP socket and bind it to a local
+IO::Socket::Multicast->new() to create a UDP socket and bind it to a local
network port. You will then subscribe one or more multicast groups
using the mcast_add() method. Subsequent calls to the standard recv()
method will now receive messages incoming messages transmitted to the
@@ -215,7 +215,7 @@
to "udp", which is more appropriate for multicasting.
To create a UDP socket suitable for sending outgoing multicast
-messages, call new() without no arguments (or with
+messages, call new() without arguments (or with
C<Proto=E<gt>'udp'>). To create a UDP socket that can also receive
incoming multicast transmissions on a specific port, call new() with
the B<LocalPort> argument.
@@ -349,7 +349,7 @@
$socket->mcast_send('Hi there group members!','225.0.1.1:1900') || die;
$socket->mcast_send("How's the weather?") || die;
-Note that you may still call IO::Socket::INET->new() with a
+Note that you may still call IO::Socket::Multicast->new() with a
B<PeerAddr>, and IO::Socket::INET will perform a connect(), creating a
default destination for calls to send().
Modified: branches/upstream/libio-socket-multicast-perl/current/t/03_multicast.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libio-socket-multicast-perl/current/t/03_multicast.t?rev=57091&op=diff
==============================================================================
--- branches/upstream/libio-socket-multicast-perl/current/t/03_multicast.t (original)
+++ branches/upstream/libio-socket-multicast-perl/current/t/03_multicast.t Thu Apr 29 09:08:44 2010
@@ -25,10 +25,13 @@
my $INTERFACE = $IO_INTERFACE && find_a_mcast_if($s);
-isa_ok( $s, 'IO::Socket::Multicast' );
-
-ok($s->mcast_add($MCAST_ADDR), 'Add socket to Multicast Group' );
-ok($s->mcast_drop($MCAST_ADDR),'Drop Multicast Group' );
+SKIP: {
+ # run only if there is an interface
+ skip("There is no interface, so we can't check", 3) unless $INTERFACE;
+ isa_ok( $s, 'IO::Socket::Multicast' );
+ ok($s->mcast_add($MCAST_ADDR), 'Add socket to Multicast Group' );
+ ok($s->mcast_drop($MCAST_ADDR),'Drop Multicast Group' );
+}
# Some basics
SKIP: {
More information about the Pkg-perl-cvs-commits
mailing list