Don't use exists() on a method call.

git-svn-id: https://svn.perl.org/qpsmtpd/trunk@487 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
Matt Sergeant 2005-07-08 13:06:15 +00:00
parent ae99e6e3f2
commit 812771ad16

View File

@ -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');