$OpenBSD: patch-lib_Net_SMTP_TLS_ButMaintained_pm,v 1.1.1.1 2012/07/03 11:48:50 sthen Exp $
--- lib/Net/SMTP/TLS/ButMaintained.pm.orig	Tue Jul  3 09:53:26 2012
+++ lib/Net/SMTP/TLS/ButMaintained.pm	Tue Jul  3 09:54:39 2012
@@ -110,10 +110,7 @@ sub starttls {
     if ( not $num == 220 ) {
         croak "Invalid response for STARTTLS: $num $txt\n";
     }
-    if (
-        not IO::Socket::SSL::socket_to_SSL( $me->{sock},
-            SSL_version => "TLSv1" ) )
-    {
+    if ( not IO::Socket::SSL::start_SSL( $me->{sock} )) {
         croak "Couldn't start TLS: " . IO::Socket::SSL::errstr . "\n";
     }
     $me->hello();
