Hello community, here is the log from the commit of package perl-IO-Socket-SSL for openSUSE:Factory checked in at 2012-03-01 17:24:25 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-IO-Socket-SSL (Old) and /work/SRC/openSUSE:Factory/.perl-IO-Socket-SSL.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-IO-Socket-SSL", Maintainer is "[email protected]" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-IO-Socket-SSL/perl-IO-Socket-SSL.changes 2012-02-14 13:09:22.000000000 +0100 +++ /work/SRC/openSUSE:Factory/.perl-IO-Socket-SSL.new/perl-IO-Socket-SSL.changes 2012-03-01 17:24:27.000000000 +0100 @@ -1,0 +2,10 @@ +Wed Feb 22 02:35:27 UTC 2012 - [email protected] + +- update to 1.55 +- work around IO::Sockets work around for systems returning EISCONN etc + on connect retry for non-blocking sockets by clearing $! if SUPER::connect + returned true. + https://rt.cpan.org/Ticket/Display.html?id=75101 + Thanks for Manoj Kumar for reporting. + +------------------------------------------------------------------- Old: ---- IO-Socket-SSL-1.54.tar.gz New: ---- IO-Socket-SSL-1.55.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-IO-Socket-SSL.spec ++++++ --- /var/tmp/diff_new_pack.ip8H6o/_old 2012-03-01 17:24:29.000000000 +0100 +++ /var/tmp/diff_new_pack.ip8H6o/_new 2012-03-01 17:24:29.000000000 +0100 @@ -16,14 +16,15 @@ # + Name: perl-IO-Socket-SSL -Version: 1.54 +Version: 1.55 Release: 0 +License: Artistic-1.0 or GPL-1.0+ %define cpan_name IO-Socket-SSL Summary: Nearly transparent SSL encapsulation for IO::Socket::INET -License: Artistic-1.0 or GPL-1.0+ -Group: Development/Libraries/Perl Url: http://search.cpan.org/dist/IO-Socket-SSL/ +Group: Development/Libraries/Perl Source: http://www.cpan.org/authors/id/S/SU/SULLR/%{cpan_name}-%{version}.tar.gz BuildRequires: perl # MANUAL BEGIN ++++++ IO-Socket-SSL-1.54.tar.gz -> IO-Socket-SSL-1.55.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IO-Socket-SSL-1.54/Changes new/IO-Socket-SSL-1.55/Changes --- old/IO-Socket-SSL-1.54/Changes 2012-01-11 09:10:47.000000000 +0100 +++ new/IO-Socket-SSL-1.55/Changes 2012-02-20 07:46:42.000000000 +0100 @@ -1,3 +1,9 @@ +v1.55 2012.02.22 +- work around IO::Sockets work around for systems returning EISCONN etc + on connect retry for non-blocking sockets by clearing $! if SUPER::connect + returned true. + https://rt.cpan.org/Ticket/Display.html?id=75101 + Thanks for Manoj Kumar for reporting. v1.54 2012.01.11 - return 0 instead of undef in SSL_verify_callback to fix unitialized warnings. Thanks to d[DOT]thomas[AT]its[DOT]uq[DOT]edu[DOT]au for diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IO-Socket-SSL-1.54/META.yml new/IO-Socket-SSL-1.55/META.yml --- old/IO-Socket-SSL-1.54/META.yml 2012-01-11 09:12:49.000000000 +0100 +++ new/IO-Socket-SSL-1.55/META.yml 2012-02-20 07:48:00.000000000 +0100 @@ -1,6 +1,6 @@ --- #YAML:1.0 name: IO-Socket-SSL -version: 1.54 +version: 1.55 abstract: Nearly transparent SSL encapsulation for IO::Socket::INET. author: - Steffen Ullrich & Peter Behroozi & Marko Asplund diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IO-Socket-SSL-1.54/SSL.pm new/IO-Socket-SSL-1.55/SSL.pm --- old/IO-Socket-SSL-1.54/SSL.pm 2012-01-11 09:07:33.000000000 +0100 +++ new/IO-Socket-SSL-1.55/SSL.pm 2012-02-20 07:44:25.000000000 +0100 @@ -78,7 +78,7 @@ }) { @ISA = qw(IO::Socket::INET); } - $VERSION = '1.54'; + $VERSION = '1.55'; $GLOBAL_CONTEXT_ARGS = {}; #Make $DEBUG another name for $Net::SSLeay::trace @@ -334,6 +334,11 @@ DEBUG(2, 'socket not yet connected' ); $self->SUPER::connect(@_) || return; DEBUG(2,'socket connected' ); + + # IO::Socket works around systems, which return EISCONN or similar + # on non-blocking re-connect by returning true, even if $! is set + # but it does not clear $!, so do it here + $! = undef; } return $self->connect_SSL; } -- To unsubscribe, e-mail: [email protected] For additional commands, e-mail: [email protected]
