cvs commit: qpsmtpd/lib/Qpsmtpd SMTP.pm Constants.pm
[email protected] (Matt Sergeant)
| Newsgroups | perl.cvs.qpsmtpd |
|---|---|
| Message-ID | <[email protected]> |
cvsuser 03/07/24 05:43:02
Modified: lib/Qpsmtpd SMTP.pm Constants.pm
Log:
Removed DISCARD
Revision Changes Path
1.15 +0 -3 qpsmtpd/lib/Qpsmtpd/SMTP.pm
Index: SMTP.pm
===================================================================
RCS file: /cvs/public/qpsmtpd/lib/Qpsmtpd/SMTP.pm,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -w -r1.14 -r1.15
--- SMTP.pm 24 Jun 2003 07:42:38 -0000 1.14
+++ SMTP.pm 24 Jul 2003 12:43:02 -0000 1.15
@@ -403,9 +403,6 @@
elsif ($rc == DENYSOFT) {
$self->respond(452, $msg || "Message denied temporarily");
}
- elsif ($rc == DISCARD) {
- $self->respond(250, $msg || "Message quietly discarded");
- }
else {
$self->queue($self->transaction);
}
1.5 +1 -8 qpsmtpd/lib/Qpsmtpd/Constants.pm
Index: Constants.pm
===================================================================
RCS file: /cvs/public/qpsmtpd/lib/Qpsmtpd/Constants.pm,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -w -r1.4 -r1.5
--- Constants.pm 24 Jun 2003 16:04:55 -0000 1.4
+++ Constants.pm 24 Jul 2003 12:43:02 -0000 1.5
@@ -2,7 +2,7 @@
use strict;
require Exporter;
-my (@common) = qw(OK DECLINED DONE DENY DENYSOFT TRACE DISCARD);
+my (@common) = qw(OK DECLINED DONE DENY DENYSOFT TRACE);
use vars qw($VERSION @ISA @EXPORT);
@ISA = qw(Exporter);
@@ -15,7 +15,6 @@
use constant DENYSOFT => 902;
use constant DECLINED => 909;
use constant DONE => 910;
-use constant DISCARD => 920;
1;
@@ -58,12 +57,6 @@
Returning this from a hook implies success, but tells qpsmtpd to
skip any remaining plugins for this phase.
-
-=item C<DISCARD>
-
-This can only be returned for the DATA phase. It tells qpsmtpd to
-return 250 to the client implying delivery success, but silently
-drops the email.
=back