1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
From 85d65f15f5ddcc69867a9f55080d005767e146d8 Mon Sep 17 00:00:00 2001
From: David Steinbrunner <dsteinbrunner@pobox.com>
Date: Tue, 26 Nov 2013 06:48:49 -0500
Subject: [PATCH] typo fix to resolve RT#79497
---
lib/Perlbal/Service.pm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
--- a/lib/Perlbal/Service.pm
+++ b/lib/Perlbal/Service.pm
@@ -1644,7 +1644,7 @@
(defined $self->{ssl_ca_path} ? (SSL_ca_path => $self->{ssl_ca_path}) : ()),
(defined $self->{ssl_verify_mode} ? (SSL_verify_mode => $self->{ssl_verify_mode}) : ()),
};
- return $mc->err("IO::Socket:SSL (0.98+) not available. Can't do SSL.") unless eval "use IO::Socket::SSL 0.98 (); 1;";
+ return $mc->err("IO::Socket::SSL (0.98+) not available. Can't do SSL.") unless eval "use IO::Socket::SSL 0.98 (); 1;";
return $mc->err("SSL key file ($self->{ssl_key_file}) doesn't exist") unless -f $self->{ssl_key_file};
return $mc->err("SSL cert file ($self->{ssl_cert_file}) doesn't exist") unless -f $self->{ssl_cert_file};
}
|
