byterazor/qpsmtpd
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix NOOP

Browse Source 
git-svn-id: https://svn.perl.org/qpsmtpd/trunk@88 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
Ask Bjørn Hansen 2002-10-14 05:47:25 +00:00
parent 97610b6840
commit 208a0cd54c
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
Changes
View File

@ -1,10 +1,12 @@
0.12-dev 0.12-dev
Use /usr/bin/perl instead of the non-standard /home/perl/bin/perl Fix NOOP command with perl 5.6.
Better installation instructions and error message when no plugin Better installation instructions and error message when no plugin
allowed or denied relaying (thanks to Lars Rander allowed or denied relaying (thanks to Lars Rander
<lrNOSPAM@rander.dk>). <lrNOSPAM@rander.dk>).
Use /usr/bin/perl instead of the non-standard /home/perl/bin/perl
0.11 - 2002/10/09 0.11 - 2002/10/09

2
lib/Qpsmtpd/SMTP.pm
View File

@ -231,9 +231,7 @@ sub help {
sub noop { sub noop {
my $self = shift; my $self = shift;
warn Data::Dumper->Dump([\$self], [qw(self)]);
$self->respond(250, "OK"); $self->respond(250, "OK");
} }
sub vrfy { sub vrfy {