Skip Menu |
 

This queue is for tickets about the IO-Socket-SSL CPAN distribution.

Report information
The Basics
Id: 95633
Status: resolved
Priority: 0/
Queue: IO-Socket-SSL

People
Owner: Nobody in particular
Requestors: paul [...] city-fan.org
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: 1.984
Fixed in: (no value)

Attachments


Subject: Typo in Utils.pm (EVP_KEY_free should be EVP_PKEY_free?)?
Download (untitled) / with headers
text/plain 439b
$ 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 {
Download (untitled) / with headers
text/plain 184b
Show quoted text
> I think KEY_free should be calling Net::SSLeay::EVP_PKEY_free rather > than Net::SSLeay::EVP_KEY_free.
Thank you for reporting the problem. It is fixed in 1.985. Regards, Steffen


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.