Hello community, here is the log from the commit of package perl-AnyEvent for openSUSE:Factory checked in at 2019-03-01 20:31:10 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-AnyEvent (Old) and /work/SRC/openSUSE:Factory/.perl-AnyEvent.new.28833 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-AnyEvent" Fri Mar 1 20:31:10 2019 rev:33 rq:680366 version:7.15 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-AnyEvent/perl-AnyEvent.changes 2017-06-26 15:56:08.806803908 +0200 +++ /work/SRC/openSUSE:Factory/.perl-AnyEvent.new.28833/perl-AnyEvent.changes 2019-03-01 20:31:13.373985169 +0100 @@ -1,0 +2,26 @@ +Tue Feb 26 06:02:24 UTC 2019 - Stephan Kulow <[email protected]> + +- updated to 7.15 + see /usr/share/doc/packages/perl-AnyEvent/Changes + + 7.15 Tue Feb 26 03:07:42 CET 2019 + - INCOMPATIBLE CHANGE: AnyEvent::Handle's tls_detect documentation gave + separate major and minor versions, while code passed only a single + value. This version follows the documentation and now passes separate + major and minor values. + - work around Net::SSLeay not having been ported to openssl 1.1, but many + distributions compiling it against openssl 1.1, which unfortunately + succeeds and results in a very broken module. + - AnyEvent::DNS::dns_unpack now stores the original DNS packet + in the __ member, to allow decoding of undecodable resouce records + containing compressed domian names. + - AnyEvent::Socket::parse_ipv6 would NOT, as advertised, accept ipv4 + addresses. It now does and converts them to ipv4 mapped addresses. + - support CAA records, based on patch by Steve Atkins. + - add freenom and cloudflare nameservers as dns fallback. + - AnyEvent::Strict would not properly ward against io watchers + on files when the handle passed was a file descriptor. + - document "internal" variables used by the dns en-/decoder to allow + enterprising users to extend them in a semi-official way. + +------------------------------------------------------------------- Old: ---- AnyEvent-7.14.tar.gz New: ---- AnyEvent-7.15.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-AnyEvent.spec ++++++ --- /var/tmp/diff_new_pack.2FNlvH/_old 2019-03-01 20:31:13.849985052 +0100 +++ /var/tmp/diff_new_pack.2FNlvH/_new 2019-03-01 20:31:13.853985051 +0100 @@ -1,7 +1,7 @@ # # spec file for package perl-AnyEvent # -# Copyright (c) 2017 SUSE LINUX GmbH, Nuernberg, Germany. +# Copyright (c) 2019 SUSE LINUX GmbH, Nuernberg, Germany. # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -12,19 +12,19 @@ # license that conforms to the Open Source Definition (Version 1.9) # published by the Open Source Initiative. -# Please submit bugfixes or comments via http://bugs.opensuse.org/ +# Please submit bugfixes or comments via https://bugs.opensuse.org/ # Name: perl-AnyEvent -Version: 7.14 +Version: 7.15 Release: 0 #Upstream: CHECK(GPL-1.0+ or Artistic-1.0) %define cpan_name AnyEvent Summary: The Dbi of Event Loop Programming -License: GPL-1.0+ or Artistic-1.0 +License: GPL-1.0-or-later OR Artistic-1.0 Group: Development/Libraries/Perl -Url: http://search.cpan.org/dist/AnyEvent/ +Url: https://metacpan.org/release/%{cpan_name} Source0: https://cpan.metacpan.org/authors/id/M/ML/MLEHMANN/%{cpan_name}-%{version}.tar.gz Source1: cpanspec.yml # MANUAL @@ -81,11 +81,11 @@ find . -type f ! -name \*.pl -print0 | xargs -0 chmod 644 %build -%{__perl} Makefile.PL INSTALLDIRS=vendor OPTIMIZE="%{optflags}" -%{__make} %{?_smp_mflags} +perl Makefile.PL INSTALLDIRS=vendor OPTIMIZE="%{optflags}" +make %{?_smp_mflags} %check -%{__make} test +make test %install %perl_make_install ++++++ AnyEvent-7.14.tar.gz -> AnyEvent-7.15.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/AnyEvent-7.14/Changes new/AnyEvent-7.15/Changes --- old/AnyEvent-7.14/Changes 2017-06-24 01:44:56.000000000 +0200 +++ new/AnyEvent-7.15/Changes 2019-02-26 03:08:13.000000000 +0100 @@ -12,6 +12,26 @@ TODO: inet_aton maybe pack C4? no, add a comment why not TODO: socket prepare callbacks, can they easily signal failure as well? +7.15 Tue Feb 26 03:07:42 CET 2019 + - INCOMPATIBLE CHANGE: AnyEvent::Handle's tls_detect documentation gave + separate major and minor versions, while code passed only a single + value. This version follows the documentation and now passes separate + major and minor values. + - work around Net::SSLeay not having been ported to openssl 1.1, but many + distributions compiling it against openssl 1.1, which unfortunately + succeeds and results in a very broken module. + - AnyEvent::DNS::dns_unpack now stores the original DNS packet + in the __ member, to allow decoding of undecodable resouce records + containing compressed domian names. + - AnyEvent::Socket::parse_ipv6 would NOT, as advertised, accept ipv4 + addresses. It now does and converts them to ipv4 mapped addresses. + - support CAA records, based on patch by Steve Atkins. + - add freenom and cloudflare nameservers as dns fallback. + - AnyEvent::Strict would not properly ward against io watchers + on files when the handle passed was a file descriptor. + - document "internal" variables used by the dns en-/decoder to allow + enterprising users to extend them in a semi-official way. + 7.14 Sat Jun 24 01:44:19 CEST 2017 - fix a crash bug in AnyEvent::Handle with openssl 1.1.0 (patched by Paul Howarth and apparently tracked down by Mike McCauley). diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/AnyEvent-7.14/META.json new/AnyEvent-7.15/META.json --- old/AnyEvent-7.14/META.json 2017-06-24 01:50:35.000000000 +0200 +++ new/AnyEvent-7.15/META.json 2019-02-26 03:08:23.000000000 +0100 @@ -4,7 +4,7 @@ "unknown" ], "dynamic_config" : 1, - "generated_by" : "ExtUtils::MakeMaker version 6.98, CPAN::Meta::Converter version 2.120351", + "generated_by" : "ExtUtils::MakeMaker version 7.34, CPAN::Meta::Converter version 2.150010", "license" : [ "unknown" ], @@ -40,10 +40,10 @@ "JSON::XS" : "2.2", "Net::SSLeay" : "1.33", "Task::Weaken" : "0" - }, - "requires" : {} + } } }, "release_status" : "stable", - "version" : "7.14" + "version" : 7.15, + "x_serialization_backend" : "JSON::PP version 2.27300" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/AnyEvent-7.14/META.yml new/AnyEvent-7.15/META.yml --- old/AnyEvent-7.14/META.yml 2017-06-24 01:50:35.000000000 +0200 +++ new/AnyEvent-7.15/META.yml 2019-02-26 03:08:23.000000000 +0100 @@ -3,28 +3,28 @@ author: - unknown build_requires: - ExtUtils::MakeMaker: 0 + ExtUtils::MakeMaker: '0' configure_requires: - Canary::Stability: 0 - ExtUtils::MakeMaker: 6.52 + Canary::Stability: '0' + ExtUtils::MakeMaker: '6.52' dynamic_config: 1 -generated_by: 'ExtUtils::MakeMaker version 6.98, CPAN::Meta::Converter version 2.120351' +generated_by: 'ExtUtils::MakeMaker version 7.34, CPAN::Meta::Converter version 2.150010' license: unknown meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html - version: 1.4 + version: '1.4' name: AnyEvent no_index: directory: - t - inc recommends: - Async::Interrupt: 1 - EV: 4 - Guard: 1.02 - JSON: 2.09 - JSON::XS: 2.2 - Net::SSLeay: 1.33 - Task::Weaken: 0 -requires: {} -version: 7.14 + Async::Interrupt: '1' + EV: '4' + Guard: '1.02' + JSON: '2.09' + JSON::XS: '2.2' + Net::SSLeay: '1.33' + Task::Weaken: '0' +version: 7.15 +x_serialization_backend: 'CPAN::Meta::YAML version 0.012' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/AnyEvent-7.14/README new/AnyEvent-7.15/README --- old/AnyEvent-7.14/README 2017-06-24 01:50:35.000000000 +0200 +++ new/AnyEvent-7.15/README 2019-02-26 03:08:23.000000000 +0100 @@ -828,7 +828,8 @@ reference to the callback after invocation. SUPPORTED EVENT LOOPS/BACKENDS - The available backend classes are (every class has its own manpage): + The following backend classes are part of the AnyEvent distribution + (every class has its own manpage): Backends that are autoprobed when no other event loop can be found. EV is the preferred backend when no other event loop seems to be in @@ -883,6 +884,12 @@ load POE when detecting them, in the hope that POE will pick them up, in which case everything will be automatic. + Known event loops outside the AnyEvent distribution + The following event loops or programs support AnyEvent by providing + their own AnyEvent backend. They will be picked up automatically. + + urxvt::anyevent available to rxvt-unicode extensions + GLOBAL VARIABLES AND FUNCTIONS These are not normally required to use AnyEvent, but can be useful to write AnyEvent extension modules. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/AnyEvent-7.14/lib/AnyEvent/DNS.pm new/AnyEvent-7.15/lib/AnyEvent/DNS.pm --- old/AnyEvent-7.14/lib/AnyEvent/DNS.pm 2017-06-10 18:38:13.000000000 +0200 +++ new/AnyEvent-7.15/lib/AnyEvent/DNS.pm 2019-02-26 02:54:04.000000000 +0100 @@ -47,14 +47,29 @@ my $ipv4 = $prep->( ["08080808", "08080404"], # 8.8.8.8, 8.8.4.4 - google public dns + ["01010101", "01000001"], # 1.1.1.1, 1.0.0.1 - cloudflare public dns + ["50505050", "50505151"], # 80.80.80.80, 80.80.81.81 - freenom.world ## ["d1f40003", "d1f30004"], # v209.244.0.3/4 - resolver1/2.level3.net - status unknown ## ["04020201", "04020203", "04020204", "04020205", "04020206"], # v4.2.2.1/3/4/5/6 - vnsc-pri.sys.gtei.net - effectively public ## ["cdd22ad2", "4044c8c8"], # 205.210.42.205, 64.68.200.200 - cache1/2.dnsresolvers.com - verified public -# ["8d010101"], # 141.1.1.1 - cable&wireless - status unknown +# ["8d010101"], # 141.1.1.1 - cable&wireless, now vodafone - status unknown +# 84.200.69.80 # dns.watch +# 84.200.70.40 # dns.watch +# 37.235.1.174 # freedns.zone +# 37.235.1.177 # freedns.zone +# 213.73.91.35 # dnscache.berlin.ccc.de +# 194.150.168.168 # dns.as250.net; Berlin/Frankfurt +# 85.214.20.141 # FoeBud (digitalcourage.de) +# 77.109.148.136 # privacyfoundation.ch +# 77.109.148.137 # privacyfoundation.ch +# 91.239.100.100 # anycast.censurfridns.dk +# 89.233.43.71 # ns1.censurfridns.dk +# 204.152.184.76 # f.6to4-servers.net, ISC, USA ); my $ipv6 = $prep->( ["20014860486000000000000000008888", "20014860486000000000000000008844"], # 2001:4860:4860::8888/8844 - google ipv6 + ["26064700470000000000000000001111", "26064700470000000000000000001001"], # 2606:4700:4700::1111/1001 - cloudflare dns ); undef $ipv4 unless $AnyEvent::PROTOCOL{ipv4}; @@ -412,6 +427,7 @@ mailb => 253, "*" => 255, uri => 256, + caa => 257, # rfc6844 ); our %type_str = reverse %type_id; @@ -572,6 +588,7 @@ }, 39 => sub { local $ofs = $ofs - length; _dec_name }, # dname 99 => sub { unpack "(C/a*)*", $_ }, # spf + 257 => sub { unpack "CC/a*a*", $_ }, # caa ); sub _dec_rr { @@ -620,7 +637,8 @@ 'aa' => '', 'an' => [], 'rd' => 1, - 'op' => 'query' + 'op' => 'query', + '__' => '<original dns packet>', } # a successful reply @@ -649,7 +667,8 @@ [ 'www.l.google.com', 'a', 'in', 3600, '66.249.93.147' ], ], 'rd' => 1, - 'op' => 0 + 'op' => 0, + '__' => '<original dns packet>', } =cut @@ -662,6 +681,7 @@ local $ofs = 6 * 2; { + __ => $pkt, id => $id, qr => ! ! ($flags & 0x8000), aa => ! ! ($flags & 0x0400), @@ -684,6 +704,70 @@ =back +=head3 Extending DNS Encoder and Decoder + +This section describes an I<experimental> method to extend the DNS encoder +and decoder with new opcode, rcode, class and type strings, as well as +resource record decoders. + +Since this is experimental, it can change, as anything can change, but +this interface is expe ctedc to be relatively stable and was stable during +the whole existance of C<AnyEvent::DNS> so far. + +Note that, since changing the decoder or encoder might break existing +code, you should either be sure to control for this, or only temporarily +change these values, e.g. like so: + + my $decoded = do { + local $AnyEvent::DNS::opcode_str{7} = "yxrrset"; + AnyEvent::DNS::dns_unpack $mypkt + }; + +=over 4 + +=item %AnyEvent::DNS::opcode_id, %AnyEvent::DNS::opcode_str + +Two hashes that map lowercase opcode strings to numerical id's (For the +encoder), or vice versa (for the decoder). Example: add a new opcode +string C<notzone>. + + $AnyEvent::DNS::opcode_id{notzone} = 10; + $AnyEvent::DNS::opcode_str{10} = 'notzone'; + +=item %AnyEvent::DNS::rcode_id, %AnyEvent::DNS::rcode_str + +Same as above, for for rcode values. + +=item %AnyEvent::DNS::class_id, %AnyEvent::DNS::class_str + +Same as above, but for resource record class names/values. + +=item %AnyEvent::DNS::type_id, %AnyEvent::DNS::type_str + +Same as above, but for resource record type names/values. + +=item %AnyEvent::DNS::dec_rr + +This hash maps resource record type values to code references. When +decoding, they are called with C<$_> set to the undecoded data portion and +C<$ofs> being the current byte offset. of the record. You should have a +look at the existing implementations to understand how it works in detail, +but here are two examples: + +Decode an A record. A records are simply four bytes with one byte per +address component, so the decoder simply unpacks them and joins them with +dots in between: + + $AnyEvent::DNS::dec_rr{1} = sub { join ".", unpack "C4", $_ }; + +Decode a CNAME record, which contains a potentially compressed domain +name. + + package AnyEvent::DNS; # for %dec_rr, $ofsd and &_dec_name + $dec_rr{5} = sub { local $ofs = $ofs - length; _dec_name }; + +=back + =head2 THE AnyEvent::DNS RESOLVER CLASS This is the class which does the actual protocol work. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/AnyEvent-7.14/lib/AnyEvent/FAQ.pod new/AnyEvent-7.15/lib/AnyEvent/FAQ.pod --- old/AnyEvent-7.14/lib/AnyEvent/FAQ.pod 2012-04-05 06:12:06.000000000 +0200 +++ new/AnyEvent-7.15/lib/AnyEvent/FAQ.pod 2018-06-13 21:34:07.000000000 +0200 @@ -2,6 +2,8 @@ AnyEvent::FAQ - frequently asked questions +=head1 FAQs + The newest version of this document can be found at L<http://pod.tst.eu/http://cvs.schmorp.de/AnyEvent/lib/AnyEvent/FAQ.pod>. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/AnyEvent-7.14/lib/AnyEvent/Handle.pm new/AnyEvent-7.15/lib/AnyEvent/Handle.pm --- old/AnyEvent-7.14/lib/AnyEvent/Handle.pm 2016-11-26 04:33:34.000000000 +0100 +++ new/AnyEvent-7.15/lib/AnyEvent/Handle.pm 2019-02-26 02:36:33.000000000 +0100 @@ -1858,9 +1858,9 @@ If it detects that the input data is likely TLS, it calls the callback with a true value for C<$detect> and the (on-wire) TLS version as second -and third argument (C<$major> is C<3>, and C<$minor> is 0..3 for SSL -3.0, TLS 1.0, 1.1 and 1.2, respectively). If it detects the input to -be definitely not TLS, it calls the callback with a false value for +and third argument (C<$major> is C<3>, and C<$minor> is 0..4 for SSL +3.0, TLS 1.0, 1.1, 1.2 and 1.3, respectively). If it detects the input +to be definitely not TLS, it calls the callback with a false value for C<$detect>. The callback could use this information to decide whether or not to start @@ -1916,7 +1916,7 @@ # full match, valid TLS record my ($major, $minor) = unpack "CC", $1; - $cb->($self, "accept", $major + $minor * 0.1); + $cb->($self, "accept", $major, $minor); } else { # mismatch == guaranteed not TLS $cb->($self, undef); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/AnyEvent-7.14/lib/AnyEvent/IO.pm new/AnyEvent-7.15/lib/AnyEvent/IO.pm --- old/AnyEvent-7.14/lib/AnyEvent/IO.pm 2013-07-31 01:59:04.000000000 +0200 +++ new/AnyEvent-7.15/lib/AnyEvent/IO.pm 2018-12-19 19:00:25.000000000 +0100 @@ -6,7 +6,7 @@ use AnyEvent::IO; - # load /etc/passwd, call clalback with the file data when done. + # load /etc/passwd, call callback with the file data when done. aio_load "/etc/passwd", sub { my ($data) = @_ or return AE::log error => "/etc/passwd: $!"; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/AnyEvent-7.14/lib/AnyEvent/Log.pm new/AnyEvent-7.15/lib/AnyEvent/Log.pm --- old/AnyEvent-7.14/lib/AnyEvent/Log.pm 2016-03-13 05:48:11.000000000 +0100 +++ new/AnyEvent-7.15/lib/AnyEvent/Log.pm 2017-09-02 02:21:23.000000000 +0200 @@ -35,7 +35,7 @@ use AnyEvent::Log; - my $tracer = AnyEvent::Log::logger trace => \$my $trace; + my $tracer = AnyEvent::Log::logger trace => \my $trace; $tracer->("i am here") if $trace; $tracer->(sub { "lots of data: " . Dumper $self }) if $trace; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/AnyEvent-7.14/lib/AnyEvent/Socket.pm new/AnyEvent-7.15/lib/AnyEvent/Socket.pm --- old/AnyEvent-7.14/lib/AnyEvent/Socket.pm 2016-12-12 17:13:42.000000000 +0100 +++ new/AnyEvent-7.15/lib/AnyEvent/Socket.pm 2017-08-12 00:38:03.000000000 +0200 @@ -104,12 +104,21 @@ print unpack "H*", parse_ipv6 "2002:5345::10.0.0.1"; # => 2002534500000000000000000a000001 + print unpack "H*", parse_ipv6 "192.89.98.1"; + # => 00000000000000000000ffffc0596201 + =cut sub parse_ipv6($) { # quick test to avoid longer processing my $n = $_[0] =~ y/://; - return undef if $n < 2 || $n > 8; + + if ($n < 2 || $n > 8) { + if (!$n && (my $ipn = parse_ipv4 $_[0])) { + return "\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xff\xff$ipn"; + } + return undef; + } my ($h, $t) = split /::/, $_[0], 2; @@ -163,17 +172,19 @@ =item $ipn = parse_address $ip -Combines C<parse_ipv4> and C<parse_ipv6> in one function. The address -here refers to the host address (not socket address) in network form -(binary). +Combines C<parse_ipv4>, C<parse_ipv6> and C<parse_unix> in one +function. The address here refers to the host address (not socket address) +in network form (binary). If the C<$text> is C<unix/>, then this function returns a special token recognised by the other functions in this module to mean "UNIX domain socket". -If the C<$text> to parse is a mapped IPv4 in IPv6 address (:ffff::<ipv4>), -then it will be treated as an IPv4 address. If you don't want that, you -have to call C<parse_ipv4> and/or C<parse_ipv6> manually. +If the C<$text> to parse is a plain IPv4 or mapped IPv4 in IPv6 address +(:ffff::<ipv4>), then it will be treated as an IPv4 address and four +octets will be returned. If you don't want that, you have to call +C<parse_ipv4> and/or C<parse_ipv6> manually (the latter always returning a +16 octet IPv6 address for mapped IPv4 addresses). Example: @@ -191,9 +202,9 @@ for (&parse_ipv6) { if ($_) { s/^\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xff\xff//; - return $_; + return $_ } else { - return &parse_ipv4 || &parse_unix + return &parse_unix } } } @@ -258,7 +269,7 @@ C<$default_service> if no service was detected. If neither a service was detected nor a default was specified, then this function returns the empty list. The same happens when a parse error was detected, such as a -hostname with a colon in it (the function is rather conservative, though). +hostname with a colon in it (the function is rather forgiving, though). Example: diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/AnyEvent-7.14/lib/AnyEvent/Strict.pm new/AnyEvent-7.15/lib/AnyEvent/Strict.pm --- old/AnyEvent-7.14/lib/AnyEvent/Strict.pm 2014-09-05 23:55:43.000000000 +0200 +++ new/AnyEvent-7.15/lib/AnyEvent/Strict.pm 2018-07-07 16:01:01.000000000 +0200 @@ -106,7 +106,7 @@ if ($fh =~ /^\s*\d+\s*$/) { $fd = $fh; - $fh = AnyEvent::_dupfh $arg{poll}, $fh; + ($fh) = AnyEvent::_dupfh $arg{poll}, $fh; } else { defined eval { $fd = fileno $fh } or confess "AnyEvent->io called with illegal fh argument '$fh'"; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/AnyEvent-7.14/lib/AnyEvent/TLS.pm new/AnyEvent-7.15/lib/AnyEvent/TLS.pm --- old/AnyEvent-7.14/lib/AnyEvent/TLS.pm 2016-07-21 12:34:40.000000000 +0200 +++ new/AnyEvent-7.15/lib/AnyEvent/TLS.pm 2019-02-26 02:26:55.000000000 +0100 @@ -576,6 +576,16 @@ eval 'sub _check_tls_gt_1 (){' . (($Net::SSLeay::VERSION >= 1.55 && Net::SSLeay::OPENSSL_VERSION_NUMBER() >= 0x1000100f) * 1) . '}'; + + # as of this writing, Net::SSLeay (1.85-2) has not been ported to OpenSSL 1.1, + # but many distributions and users compile it against openssl 1.1, leading to + # many symbols not being defined because they are now enums instead of macros + # and have different prefixes. + # The only one we use is SSL_ST_OK, or TLS_ST_OK, which should be available + # as Net::SSLeay::ST_OK. If it is not callable, we define it to be 1, which + # hopefully will not change. + eval 'Net::SSLeay::ST_OK (); 1' + or *Net::SSLeay::ST_OK = sub () { 1 }; } our %SSL_METHODS = ( diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/AnyEvent-7.14/lib/AnyEvent/Util.pm new/AnyEvent-7.15/lib/AnyEvent/Util.pm --- old/AnyEvent-7.14/lib/AnyEvent/Util.pm 2016-04-24 23:39:16.000000000 +0200 +++ new/AnyEvent-7.15/lib/AnyEvent/Util.pm 2017-10-25 05:16:27.000000000 +0200 @@ -550,7 +550,7 @@ Note the the PID might already have been recycled and used by an unrelated process at the time C<run_cmd> returns, so it's not useful to send -signals, use a unique key in data structures and so on. +signals, use as a unique key in data structures and so on. =back diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/AnyEvent-7.14/lib/AnyEvent.pm new/AnyEvent-7.15/lib/AnyEvent.pm --- old/AnyEvent-7.14/lib/AnyEvent.pm 2017-06-24 01:45:19.000000000 +0200 +++ new/AnyEvent-7.15/lib/AnyEvent.pm 2017-10-13 16:11:46.000000000 +0200 @@ -864,7 +864,8 @@ =head1 SUPPORTED EVENT LOOPS/BACKENDS -The available backend classes are (every class has its own manpage): +The following backend classes are part of the AnyEvent distribution (every +class has its own manpage): =over 4 @@ -924,6 +925,13 @@ load L<POE> when detecting them, in the hope that POE will pick them up, in which case everything will be automatic. +=item Known event loops outside the AnyEvent distribution + +The following event loops or programs support AnyEvent by providing their +own AnyEvent backend. They will be picked up automatically. + + urxvt::anyevent available to rxvt-unicode extensions + =back =head1 GLOBAL VARIABLES AND FUNCTIONS @@ -1260,7 +1268,7 @@ use Carp (); -our $VERSION = 7.14; +our $VERSION = 7.15; our $MODEL; our @ISA; our @REGISTRY;
