| Subject: | Typo in Utils.pm (EVP_KEY_free should be EVP_PKEY_free?)? |
$ perl -MIO::Socket::SSL::Utils -e 'KEY_free(KEY_create_rsa())'
Can't locate auto/Net/SSLeay/EVP_KEY_fre.al in @INC (@INC contains: /usr/local/lib64/perl5 /usr/local/share/perl5 /usr/lib64/perl5/vendor_perl /usr/share/perl5/vendor_perl /usr/lib64/perl5 /usr/share/perl5 .) at /usr/share/perl5/vendor_perl/IO/Socket/SSL/Utils.pm line 96.
I think KEY_free should be calling Net::SSLeay::EVP_PKEY_free rather than Net::SSLeay::EVP_KEY_free.
| Subject: | IO-Socket-SSL-1.984-key-free.patch |
--- lib/IO/Socket/SSL/Utils.pm
+++ lib/IO/Socket/SSL/Utils.pm
@@ -93,7 +93,7 @@ sub CERT_free {
sub KEY_free {
my $key = shift or return;
- Net::SSLeay::EVP_KEY_free($key);
+ Net::SSLeay::EVP_PKEY_free($key);
}
sub KEY_create_rsa {