From b2866452b53ce602bfccddaaaf3d94a5bb5ea2f6 Mon Sep 17 00:00:00 2001 From: Steve Hay Date: Thu, 9 Oct 2014 21:31:56 +0100 Subject: Tidy up following 042ff9d728 Two IO::Socket::SSL version bumps were missed (probably because they were wrong to start with, saying 1.944 instead of 1.994!). Also, update Changes. --- Changes | 3 ++- lib/Net/FTP.pm | 4 ++-- 2 files changed, 4 insertions(+), 3 deletions(-) diff --git a/Changes b/Changes index 84f7ea5..4349305 100644 --- a/Changes +++ b/Changes @@ -1,6 +1,7 @@ libnet 3.01 -- TODO - * TODO + * Require IO::Socket::SSL >= 1.999 to protect against a bad version (0.30) of + IO::Socket::IP and hopefully fix another bunch of CPAN Testers failures. libnet 3.00 -- Thu Oct 09 2014 diff --git a/lib/Net/FTP.pm b/lib/Net/FTP.pm index aa16bc8..39e1e74 100644 --- a/lib/Net/FTP.pm +++ b/lib/Net/FTP.pm @@ -107,7 +107,7 @@ sub new { $tlsargs{$_} = $arg{$_} for(grep { m{^SSL_} } keys %arg); } elsif ($arg{SSL}) { - croak("IO::Socket::SSL >= 1.944 needed for SSL support"); + croak("IO::Socket::SSL >= 1.999 needed for SSL support"); } my $ftp = $pkg->SUPER::new( @@ -287,7 +287,7 @@ sub size { sub starttls { my $ftp = shift; - can_ssl() or croak("IO::Socket::SSL >= 1.944 needed for SSL support"); + can_ssl() or croak("IO::Socket::SSL >= 1.999 needed for SSL support"); $ftp->is_SSL and croak("called starttls within SSL session"); $ftp->_AUTH('TLS') == CMD_OK or return; -- cgit v1.2.3-24-ge0c7