r42141 - in /trunk/libio-socket-ssl-perl: Changes MANIFEST META.yml SSL.pm debian/changelog debian/control t/memleak_bad_handshake.t
ansgar-guest at users.alioth.debian.org
ansgar-guest at users.alioth.debian.org
Thu Aug 20 08:52:14 UTC 2009
Author: ansgar-guest
Date: Thu Aug 20 08:52:08 2009
New Revision: 42141
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=42141
Log:
* New upstream release.
* debian/control: Make build-dep on perl unversioned.
* Bump Standards-Version to 3.8.3.
Added:
trunk/libio-socket-ssl-perl/t/memleak_bad_handshake.t
- copied unchanged from r42140, branches/upstream/libio-socket-ssl-perl/current/t/memleak_bad_handshake.t
Modified:
trunk/libio-socket-ssl-perl/Changes
trunk/libio-socket-ssl-perl/MANIFEST
trunk/libio-socket-ssl-perl/META.yml
trunk/libio-socket-ssl-perl/SSL.pm
trunk/libio-socket-ssl-perl/debian/changelog
trunk/libio-socket-ssl-perl/debian/control
Modified: trunk/libio-socket-ssl-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libio-socket-ssl-perl/Changes?rev=42141&op=diff
==============================================================================
--- trunk/libio-socket-ssl-perl/Changes (original)
+++ trunk/libio-socket-ssl-perl/Changes Thu Aug 20 08:52:08 2009
@@ -1,3 +1,11 @@
+
+v1.30 2009.08.19
+- fix test t/memleak_bad_handshake.t
+v1.29 2009.08.19
+- fixed thanks for version 1.28
+v1.28 2009.08.19
+- fix memleak when SSL handshake failed.
+ Thanks richardhundtu[AT]gmail[DOT]com
v1.27 2009.07.24
- changed possible local/utf-8 depended \w in some regex against more
Modified: trunk/libio-socket-ssl-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libio-socket-ssl-perl/MANIFEST?rev=42141&op=diff
==============================================================================
--- trunk/libio-socket-ssl-perl/MANIFEST (original)
+++ trunk/libio-socket-ssl-perl/MANIFEST Thu Aug 20 08:52:08 2009
@@ -40,5 +40,6 @@
t/auto_verify_hostname.t
t/inet6.t
t/testlib.pl
+t/memleak_bad_handshake.t
util/export_certs.pl
META.yml Module meta-data (added by MakeMaker)
Modified: trunk/libio-socket-ssl-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libio-socket-ssl-perl/META.yml?rev=42141&op=diff
==============================================================================
--- trunk/libio-socket-ssl-perl/META.yml (original)
+++ trunk/libio-socket-ssl-perl/META.yml Thu Aug 20 08:52:08 2009
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: IO-Socket-SSL
-version: 1.27
+version: 1.30
abstract: Nearly transparent SSL encapsulation for IO::Socket::INET.
license: ~
author:
Modified: trunk/libio-socket-ssl-perl/SSL.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libio-socket-ssl-perl/SSL.pm?rev=42141&op=diff
==============================================================================
--- trunk/libio-socket-ssl-perl/SSL.pm (original)
+++ trunk/libio-socket-ssl-perl/SSL.pm Thu Aug 20 08:52:08 2009
@@ -66,7 +66,7 @@
}) {
@ISA = qw(IO::Socket::INET);
}
- $VERSION = '1.27';
+ $VERSION = '1.30';
$GLOBAL_CONTEXT_ARGS = {};
#Make $DEBUG another name for $Net::SSLeay::trace
@@ -787,8 +787,8 @@
sub stop_SSL {
my $self = shift || return _invalid_object();
my $stop_args = (ref($_[0]) eq 'HASH') ? $_[0] : {@_};
- return $self->error("SSL object already closed")
- unless (${*$self}{'_SSL_opened'} == 1);
+ return $self->error("SSL object not open")
+ if ! ${*$self}{'_SSL_opened'};
if (my $ssl = ${*$self}{'_SSL_object'}) {
my $shutdown_done;
@@ -862,7 +862,7 @@
sub kill_socket {
my $self = shift;
shutdown($self, 2);
- $self->close(SSL_no_shutdown => 1) if (${*$self}{'_SSL_opened'} == 1);
+ $self->close(SSL_no_shutdown => 1) if ${*$self}{'_SSL_opened'};
delete(${*$self}{'_SSL_ctx'});
return;
}
@@ -1187,7 +1187,7 @@
sub DESTROY {
my $self = shift || return;
$self->close(_SSL_in_DESTROY => 1, SSL_no_shutdown => 1)
- if (${*$self}{'_SSL_opened'} == 1);
+ if ${*$self}{'_SSL_opened'};
delete(${*$self}{'_SSL_ctx'});
}
Modified: trunk/libio-socket-ssl-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libio-socket-ssl-perl/debian/changelog?rev=42141&op=diff
==============================================================================
--- trunk/libio-socket-ssl-perl/debian/changelog (original)
+++ trunk/libio-socket-ssl-perl/debian/changelog Thu Aug 20 08:52:08 2009
@@ -1,3 +1,11 @@
+libio-socket-ssl-perl (1.30-1) unstable; urgency=low
+
+ * New upstream release.
+ * debian/control: Make build-dep on perl unversioned.
+ * Bump Standards-Version to 3.8.3.
+
+ -- Ansgar Burchardt <ansgar at 43-1.org> Thu, 20 Aug 2009 10:51:59 +0200
+
libio-socket-ssl-perl (1.27-1) unstable; urgency=low
* New upstream release
Modified: trunk/libio-socket-ssl-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libio-socket-ssl-perl/debian/control?rev=42141&op=diff
==============================================================================
--- trunk/libio-socket-ssl-perl/debian/control (original)
+++ trunk/libio-socket-ssl-perl/debian/control Thu Aug 20 08:52:08 2009
@@ -5,10 +5,10 @@
Uploaders: gregor herrmann <gregoa at debian.org>,
Ansgar Burchardt <ansgar at 43-1.org>, Rene Mayorga <rmayorga at debian.org>,
Antonio Radici <antonio at dyne.org>, Salvatore Bonaccorso <salvatore.bonaccorso at gmail.com>
-Build-Depends: debhelper (>= 7), perl (>= 5.8.0-7)
+Build-Depends: debhelper (>= 7), perl
Build-Depends-Indep: libnet-ssleay-perl (>= 1.35), netbase, libio-socket-inet6-perl,
libnet-libidn-perl
-Standards-Version: 3.8.2
+Standards-Version: 3.8.3
Homepage: http://search.cpan.org/dist/IO-Socket-SSL/
Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libio-socket-ssl-perl/
Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libio-socket-ssl-perl/
More information about the Pkg-perl-cvs-commits
mailing list