From f1b8fa42ec61c1e359ffe1cdb701cef24c597431 Mon Sep 17 00:00:00 2001 From: Steve Corriere Date: Tue, 26 May 2015 13:18:49 +0000 Subject: [PATCH] Increased version support for TLS. --- generic/tclcurl.c | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/generic/tclcurl.c b/generic/tclcurl.c index 8185c30..5e7aea3 100755 --- a/generic/tclcurl.c +++ b/generic/tclcurl.c @@ -854,6 +854,15 @@ curlSetOpts(Tcl_Interp *interp, struct curlObjData *curlData, break; case 3: longNumber=CURL_SSLVERSION_SSLv3; + break; + case 4: + longNumber=CURL_SSLVERSION_TLSv1_0; + break; + case 5: + longNumber=CURL_SSLVERSION_TLSv1_1; + break; + case 6: + longNumber=CURL_SSLVERSION_TLSv1_2; } tmpObjPtr=Tcl_NewLongObj(longNumber); if (SetoptLong(interp,curlHandle,CURLOPT_SSLVERSION,