[svn:qpsmtpd] rev 489 - in branches/0.31: lib/Qpsmtpd plugins

[email protected] 8 Jul 2005 16:50:24 -0000
Newsgroups perl.cvs.qpsmtpd
Message-ID <[email protected]>
Author: msergeant
Date: Fri Jul  8 09:50:24 2005
New Revision: 489

Added:
   branches/0.31/plugins/tls
      - copied unchanged from rev 488, trunk/plugins/tls
Modified:
   branches/0.31/lib/Qpsmtpd/SMTP.pm
Log:
tls support


Modified: branches/0.31/lib/Qpsmtpd/SMTP.pm
==============================================================================
--- branches/0.31/lib/Qpsmtpd/SMTP.pm	(original)
+++ branches/0.31/lib/Qpsmtpd/SMTP.pm	Fri Jul  8 09:50:24 2005
@@ -124,6 +124,7 @@ sub reset_transaction {
 
 sub connection {
   my $self = shift;
+  @_ and $self->{_connection} = shift;
   return $self->{_connection} || ($self->{_connection} = Qpsmtpd::Connection->new());
 }