rhsbl: added default reject settings
This commit is contained in:
parent
b5d99eea05
commit
e40994d13f
@ -46,6 +46,11 @@ sub register {
|
||||
else {
|
||||
$self->{_args} = { @_ };
|
||||
};
|
||||
|
||||
if ( ! defined $self->{_args}{reject} ) {
|
||||
$self->{_args}{reject} = 1;
|
||||
};
|
||||
$self->{_args}{reject_type} ||= 'perm';
|
||||
}
|
||||
|
||||
sub hook_mail {
|
||||
@ -94,7 +99,8 @@ sub hook_mail {
|
||||
$self->log(LOGDEBUG, "TXT record found: " . $rr->txtdata);
|
||||
};
|
||||
|
||||
if ( $result ) {
|
||||
next if ! $result;
|
||||
|
||||
$self->log(LOGINFO, "fail, $result");
|
||||
|
||||
my $host = $transaction->sender->host;
|
||||
@ -104,7 +110,6 @@ sub hook_mail {
|
||||
|
||||
my $hello = $self->qp->connection->hello_host;
|
||||
return $self->get_reject( "Mail from HELO $hello rejected because it $result" );
|
||||
};
|
||||
}
|
||||
}
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user