From e8cb1c3e94c9effc596aafb0442434d07098fc5d Mon Sep 17 00:00:00 2001
From: Matt Simerson <matt@tnpi.net>
Date: Tue, 4 May 2010 01:04:38 -0400
Subject: [PATCH] added definedness test to $local_port as it was emitting
 errors to to not being defined. My previous commit to TcpServer.pm fixed that
 problem.

Signed-off-by: Robert <rspier@pobox.com>
---
 plugins/tls | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/plugins/tls b/plugins/tls
index b690eb6..37fbc9a 100644
--- a/plugins/tls
+++ b/plugins/tls
@@ -143,7 +143,7 @@ sub hook_connect {
     my ($self, $transaction) = @_;
 
     my $local_port = $self->qp->connection->local_port;
-    return DECLINED unless $local_port == 465; # SMTPS
+    return DECLINED unless defined $local_port && $local_port == 465; # SMTPS
     
     unless ( _convert_to_ssl($self) ) {
         return (DENY_DISCONNECT, "Cannot establish SSL session");