[svn:qpsmtpd] rev 472 - trunk/lib/Qpsmtpd

[email protected] 6 Jul 2005 20:36:02 -0000
Newsgroups perl.cvs.qpsmtpd
Message-ID <[email protected]>
Author: msergeant
Date: Wed Jul  6 13:36:02 2005
New Revision: 472

Modified:
   trunk/lib/Qpsmtpd/SMTP.pm
Log:
No idea what that was doing in there...


Modified: trunk/lib/Qpsmtpd/SMTP.pm
==============================================================================
--- trunk/lib/Qpsmtpd/SMTP.pm	(original)
+++ trunk/lib/Qpsmtpd/SMTP.pm	Wed Jul  6 13:36:02 2005
@@ -50,9 +50,6 @@ sub dispatch {
 
   $self->{_counter}++; 
 
-  #$self->respond(553, $state{dnsbl_blocked}), return 1
-  #  if $state{dnsbl_blocked} and ($cmd eq "rcpt");
-
   if ($cmd !~ /^(\w{1,12})$/ or !exists $self->{_commands}->{$1}) {
     my ($rc, $msg) = $self->run_hooks("unrecognized_command", $cmd);
     if ($rc == DENY) {