PKGBUILDs/extra/perl-anyevent/issue53923.patch

27 lines
1.4 KiB
Diff
Raw Normal View History

2017-05-24 12:37:30 +00:00
--- AnyEvent/lib/AnyEvent/Handle.pm 2016/10/30 23:03:36 1.248
+++ AnyEvent/lib/AnyEvent/Handle.pm 2016/11/26 03:34:50 1.249
@@ -2195,19 +2195,19 @@
# basically, this is deep magic (because SSL_read should have the same issues)
# but the openssl maintainers basically said: "trust us, it just works".
# (unfortunately, we have to hardcode constants because the abysmally misdesigned
- # and mismaintained ssleay-module doesn't even offer them).
+ # and mismaintained ssleay-module didn't offer them for a decade or so).
# http://www.mail-archive.com/openssl-dev@openssl.org/msg22420.html
#
# in short: this is a mess.
- #
+ #
# note that we do not try to keep the length constant between writes as we are required to do.
# we assume that most (but not all) of this insanity only applies to non-blocking cases,
# and we drive openssl fully in blocking mode here. Or maybe we don't - openssl seems to
# have identity issues in that area.
-# Net::SSLeay::CTX_set_mode ($ssl,
+# Net::SSLeay::set_mode ($ssl,
# (eval { local $SIG{__DIE__}; Net::SSLeay::MODE_ENABLE_PARTIAL_WRITE () } || 1)
# | (eval { local $SIG{__DIE__}; Net::SSLeay::MODE_ACCEPT_MOVING_WRITE_BUFFER () } || 2));
- Net::SSLeay::CTX_set_mode ($tls, 1|2);
+ Net::SSLeay::set_mode ($tls, 1|2);
$self->{_rbio} = Net::SSLeay::BIO_new (Net::SSLeay::BIO_s_mem ());
$self->{_wbio} = Net::SSLeay::BIO_new (Net::SSLeay::BIO_s_mem ());