Author: jpeacock
Date: Tue Oct 7 06:48:45 2008
New Revision: 950
Modified:
trunk/plugins/tls
Log:
Sometimes Perl is too smart for its own good. Precedence rules sux...
Modified: trunk/plugins/tls
==============================================================================
--- trunk/plugins/tls (original)
+++ trunk/plugins/tls Tue Oct 7 06:48:45 2008
@@ -75,7 +75,7 @@
$self->tls_ca($ca);
$self->tls_ciphers($self->qp->config('tls_ciphers') || 'HIGH');
- $self->log(LOGINFO, "ciphers: $self->tls_ciphers");
+ $self->log(LOGINFO, "ciphers: ".$self->tls_ciphers);
local $^W; # this bit is very noisy...
my $ssl_ctx = IO::Socket::SSL::SSL_Context->new(
