Skip to content

Commit bcdc625

Browse files
Fix openssl 1.1 deprecation SSLeay_version() -> OpenSSL_version()
1 parent c77e84f commit bcdc625

File tree

2 files changed

+8
-0
lines changed

2 files changed

+8
-0
lines changed

src/chanprog.c

+4
Original file line numberDiff line numberDiff line change
@@ -297,7 +297,11 @@ void tell_verbose_status(int idx)
297297
#elif !defined HAVE_EVP_PKEY_GET1_EC_KEY && !defined HAVE_OPENSSL_MD5
298298
"TLS library: %s (%s " OPENSSL_VERSION_TEXT ")\n (no elliptic curve or MD5 support)\n",
299299
#endif
300+
#if (OPENSSL_VERSION_NUMBER >= 0x10100000L)
301+
OpenSSL_version(OPENSSL_VERSION), MISC_HEADERVERSION);
302+
#else
300303
SSLeay_version(SSLEAY_VERSION), MISC_HEADERVERSION);
304+
#endif
301305
#else
302306
dprintf(idx, "TLS support is not available.\n");
303307
#endif

src/tclmisc.c

+4
Original file line numberDiff line numberDiff line change
@@ -786,7 +786,11 @@ static int tcl_status STDVAR
786786
if ((argc < 2) || !strcmp(argv[1], "tls")) {
787787
Tcl_AppendElement(irp, "tls");
788788
#ifdef TLS
789+
#if (OPENSSL_VERSION_NUMBER >= 0x10100000L)
790+
Tcl_AppendElement(irp, OpenSSL_version(OPENSSL_VERSION));
791+
#else
789792
Tcl_AppendElement(irp, SSLeay_version(SSLEAY_VERSION));
793+
#endif
790794
#else
791795
Tcl_AppendElement(irp, "disabled");
792796
#endif

0 commit comments

Comments
 (0)