about summary refs log tree commit
diff options
context:
space:
mode:
authorSteve Hay <steve.m.hay@googlemail.com>2014-10-09 21:31:56 +0100
committerSteve Hay <steve.m.hay@googlemail.com>2014-10-09 21:31:56 +0100
commitb2866452b53ce602bfccddaaaf3d94a5bb5ea2f6 (patch)
tree70da96e1a567d3907fb8a825aef2349707966816
parent042ff9d728f2100e7e30d61d9664755140f5e23e (diff)
downloadperl-libnet-b2866452b53ce602bfccddaaaf3d94a5bb5ea2f6.tar.gz
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.
-rw-r--r--Changes3
-rw-r--r--lib/Net/FTP.pm4
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;