From 4b35964a8b3d464817b37c15244e28e920307814 Mon Sep 17 00:00:00 2001
From: Michael Herger <mherger@logitech.com>
Date: Mon, 21 Oct 2019 09:52:38 +0200
Subject: [PATCH] Add another patch to AnyEvent::Handle. It's causing errors on
 newer Perl versions.

---
 {CPAN => lib}/AnyEvent/Handle.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)
 rename {CPAN => lib}/AnyEvent/Handle.pm (99%)

diff --git a/CPAN/AnyEvent/Handle.pm b/lib/AnyEvent/Handle.pm
similarity index 99%
rename from CPAN/AnyEvent/Handle.pm
rename to lib/AnyEvent/Handle.pm
index 58cc24ca1e5..4af8409743d 100644
--- a/CPAN/AnyEvent/Handle.pm
+++ b/lib/AnyEvent/Handle.pm
@@ -1770,7 +1770,7 @@ sub _tls_error {
    return $self->_error ($!, 1)
       if $err == Net::SSLeay::ERROR_SYSCALL ();
 
-   my $err =Net::SSLeay::ERR_error_string (Net::SSLeay::ERR_get_error ());
+   $err =Net::SSLeay::ERR_error_string (Net::SSLeay::ERR_get_error ());
 
    # reduce error string to look less scary
    $err =~ s/^error:[0-9a-fA-F]{8}:[^:]+:([^:]+):/\L$1: /;