default the header to "unknown"
git-svn-id: https://svn.perl.org/qpsmtpd/trunk@164 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
parent
9f857f845e
commit
199c2164a4
@ -76,7 +76,9 @@ sub _uri_escape {
|
|||||||
sub data_handler {
|
sub data_handler {
|
||||||
my ($self, $transaction) = @_;
|
my ($self, $transaction) = @_;
|
||||||
|
|
||||||
$transaction->header->add('Received-SPF' => $self->qp->connection->notes('spf_header'), 0);
|
my $header = $self->qp->connection->notes('spf_header') || 'unknown';
|
||||||
|
|
||||||
|
$transaction->header->add('Received-SPF' => $header, 0);
|
||||||
|
|
||||||
return DECLINED;
|
return DECLINED;
|
||||||
}
|
}
|
||||||
|
Loading…
Reference in New Issue
Block a user