[svn:qpsmtpd] r680 - branches/0.3x/lib/Qpsmtpd

[email protected] Fri, 8 Dec 2006 12:55:48 -0800 (PST)
Newsgroups perl.cvs.qpsmtpd
Message-ID <[email protected]>
Author: msergeant
Date: Fri Dec  8 12:55:47 2006
New Revision: 680

Modified:
   branches/0.3x/lib/Qpsmtpd/Command.pm

Log:
Remove debug print


Modified: branches/0.3x/lib/Qpsmtpd/Command.pm
==============================================================================
--- branches/0.3x/lib/Qpsmtpd/Command.pm	(original)
+++ branches/0.3x/lib/Qpsmtpd/Command.pm	Fri Dec  8 12:55:47 2006
@@ -99,7 +99,6 @@
 sub parse_mail {
     my ($self,$cmd,$line) = @_;
     return (DENY, "Syntax error in command") unless $line =~ s/^from:\s*//i;
-    print "parse_mail: $line\n";
     return &_get_mail_params($cmd, $line);
 }
 ### RFC 1869: