Don't do exists() on a method call
git-svn-id: https://svn.perl.org/qpsmtpd/branches/0.31@506 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
parent
3707751b42
commit
bcbe2ac25f
@ -184,7 +184,7 @@ sub denysoft_greylist {
|
|||||||
$self->log(LOGDEBUG, "config: " . join(',',map { $_ . '=' . $config->{$_} } sort keys %$config));
|
$self->log(LOGDEBUG, "config: " . join(',',map { $_ . '=' . $config->{$_} } sort keys %$config));
|
||||||
|
|
||||||
# Always allow relayclients and whitelisted hosts/senders
|
# Always allow relayclients and whitelisted hosts/senders
|
||||||
return DECLINED if exists $self->qp->connection->relay_client();
|
return DECLINED if $self->qp->connection->relay_client();
|
||||||
return DECLINED if $self->qp->connection->notes('whitelisthost');
|
return DECLINED if $self->qp->connection->notes('whitelisthost');
|
||||||
return DECLINED if $transaction->notes('whitelistsender');
|
return DECLINED if $transaction->notes('whitelistsender');
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user