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

fix thinko from the log cleanup

Browse Source 
git-svn-id: https://svn.perl.org/qpsmtpd/trunk@381 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
Ask Bjørn Hansen 2005-03-03 17:28:43 +00:00
parent 43aa207242
commit a44957dc86
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
plugins/require_resolvable_fromhost
View File

@ -13,7 +13,7 @@ sub mail_handler {
$sender->format ne "<>" $sender->format ne "<>"
and $self->qp->config("require_resolvable_fromhost") and $self->qp->config("require_resolvable_fromhost")
and !check_dns($sender->host) and !$self->check_dns($sender->host)
and return (DENYSOFT, and return (DENYSOFT,
($sender->host ($sender->host
? "Could not resolve ". $sender->host ? "Could not resolve ". $sender->host
@ -25,7 +25,7 @@ sub mail_handler {
sub check_dns { sub check_dns {
my $host = shift; my ($self, $host) = @_;
# for stuff where we can't even parse a hostname out of the address # for stuff where we can't even parse a hostname out of the address
return 0 unless $host; return 0 unless $host;