You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

38 lines
1.0 KiB

Index: Crypt-SSLeay-0.51/SSLeay.xs
--- Crypt-SSLeay-0.51/SSLeay.xs.orig 2006-02-25 17:19:27 +0100
+++ Crypt-SSLeay-0.51/SSLeay.xs 2006-02-25 17:31:31 +0100
@@ -40,7 +40,7 @@
*/
-static void InfoCallback(SSL *s,int where,int ret)
+static void InfoCallback(const SSL *s,int where,int ret)
{
char *str;
int w;
@@ -107,9 +107,10 @@
int rand_bytes_read;
if(!bNotFirstTime) {
- SSLeay_add_all_algorithms();
SSL_load_error_strings();
ERR_load_crypto_strings();
+ SSL_library_init();
+ SSLeay_add_all_algorithms();
bNotFirstTime = 1;
}
Index: IO-Socket-SSL-0.97/SSL.pm
--- IO-Socket-SSL-0.97/SSL.pm.orig 2005-07-17 02:25:02 +0200
+++ IO-Socket-SSL-0.97/SSL.pm 2006-02-25 17:18:41 +0100
@@ -220,8 +220,7 @@
sub read {
my $self = shift;
- return $self->generic_read($self->blocking ? \&Net::SSLeay::ssl_read_all :
- \&Net::SSLeay::read, @_);
+ return $self->generic_read(\&Net::SSLeay::read, @_);
}
sub peek {