[79052] trunk/dports/perl/p5-io-socket-ssl

l2g at macports.org l2g at macports.org
Tue May 31 01:51:10 PDT 2011


Revision: 79052
          http://trac.macports.org/changeset/79052
Author:   l2g at macports.org
Date:     2011-05-31 01:51:10 -0700 (Tue, 31 May 2011)
Log Message:
-----------
p5-io-socket-ssl: upgraded to 1.44; removed patch since it's now moot

Modified Paths:
--------------
    trunk/dports/perl/p5-io-socket-ssl/Portfile

Removed Paths:
-------------
    trunk/dports/perl/p5-io-socket-ssl/files/patch-t-nonblock.t.diff

Modified: trunk/dports/perl/p5-io-socket-ssl/Portfile
===================================================================
--- trunk/dports/perl/p5-io-socket-ssl/Portfile	2011-05-31 08:47:43 UTC (rev 79051)
+++ trunk/dports/perl/p5-io-socket-ssl/Portfile	2011-05-31 08:51:10 UTC (rev 79052)
@@ -4,8 +4,7 @@
 PortSystem          1.0
 PortGroup           perl5 1.0
 
-# See patchfiles and livecheck.version at bottom when upgrading. -L2G
-perl5.setup         IO-Socket-SSL 1.43
+perl5.setup         IO-Socket-SSL 1.44
 platforms           darwin
 maintainers         l2g openmaintainer
 license             Artistic GPL
@@ -17,18 +16,10 @@
                     oriented interface to SSL sockets. The class is a \
                     descendent of IO::Socket::INET.
 
-checksums           sha1    44c57e7164b897592295dba633dfe4f93bfc7685 \
-                    rmd160  ebbbcf41faf160d4f7fbb4c7c45de425fac5c33b
+checksums           sha1    d85f450a2d6350a3b06980326ced1c6b7076d66a \
+                    rmd160  03385416241c587b307001e1c8035b709e9ca256
 
 depends_lib-append  port:p5-net-ssleay port:p5-net-libidn
 
 # Only required for full testing:
 #depends_build-append port:p5-io-socket-inet6
-
-# This patch was backported from 1.43_1 (CPAN's version number, not
-# MacPorts'). Once 1.44 or later is released, it will probably be obsolete.
-patchfiles          patch-t-nonblock.t.diff
-
-# This is just to quell livecheck until something later than 1.43_1 is
-# released. At that point, it should be removed.
-livecheck.version   1.43_1

Deleted: trunk/dports/perl/p5-io-socket-ssl/files/patch-t-nonblock.t.diff
===================================================================
--- trunk/dports/perl/p5-io-socket-ssl/files/patch-t-nonblock.t.diff	2011-05-31 08:47:43 UTC (rev 79051)
+++ trunk/dports/perl/p5-io-socket-ssl/files/patch-t-nonblock.t.diff	2011-05-31 08:51:10 UTC (rev 79052)
@@ -1,57 +0,0 @@
---- ../IO-Socket-SSL-1.43/t/nonblock.t	2011-05-11 00:56:38.000000000 -0700
-+++ t/nonblock.t	2011-05-12 09:09:54.000000000 -0700
-@@ -91,12 +91,22 @@
- 
- 	# nonblocking connect of tcp socket
- 	while (1) {
--	    $to_server->connect( $server_addr ) && last;
--	    if ( $! == EINPROGRESS ) {
-+	    connect($to_server,$server_addr ) && last;
-+	    if ( $!{EINPROGRESS} ) {
- 		diag( 'connect in progress' );
--		IO::Select->new( $to_server )->can_read(30) && next;
-+		IO::Select->new( $to_server )->can_write(30) && next;
- 		print "not ";
- 		last;
-+	    } elsif ( $!{EALREADY} ) {	
-+		diag( 'connect not yet completed'); 
-+		# just wait
-+		select(undef,undef,undef,0.1);
-+		next;
-+	    } elsif ( $!{EISCONN} ) {
-+		diag('claims that socket is already connected');
-+		# found on Mac OS X, dunno why it does not tell me that
-+		# the connect succeeded before
-+		last;
- 	    }
- 	    diag( 'connect failed: '.$! );
- 	    print "not ";
-@@ -111,7 +121,27 @@
- 	$to_server->blocking(0);
- 
- 	# send some plain text on non-ssl socket
--	syswrite( $to_server,'plaintext' ) || print "not ";
-+	my $pmsg = 'plaintext';
-+	while ( $pmsg ne '' ) {
-+	    my $w = syswrite( $to_server,$pmsg );
-+	    if ( ! defined $w ) {
-+	    	if ( ! $!{EAGAIN} ) {
-+		    diag("syswrite failed with $!");
-+		    print "not ";
-+		    last;
-+		}
-+		IO::Select->new($to_server)->can_write(30) or do {
-+		    diag("failed to get write ready");
-+		    print "not ";
-+		    last;
-+		};
-+	    } elsif ( $w>0 ) {
-+	    	diag("wrote $w bytes");
-+		substr($pmsg,0,$w,'');
-+	    } else {
-+		die "syswrite returned 0";
-+	    }
-+	}
- 	ok( "write plain text" );
- 
- 	# let server catch up, so that it awaits my connection
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20110531/7518af02/attachment.html>


More information about the macports-changes mailing list