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 {
|
||||
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;
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user