limit split = to 2 fields
(for cases where the field had more than one = sign)
This commit is contained in:
parent
f3872b1e66
commit
affd8c3f93
@ -816,7 +816,7 @@ sub clean_authentication_results {
|
||||
# Do not rename A-R header if DKIM signed
|
||||
my $dkim_sig = $self->transaction->header->get('DKIM-Signature');
|
||||
if ($dkim_sig) {
|
||||
my %fields = map { split /=/ } split /;\s+/, $dkim_sig;
|
||||
my %fields = map { split /=/, $_, 2 } split /;\s+/, $dkim_sig;
|
||||
# print Data::Dumper::Dumper(\%fields);
|
||||
if ($fields{h} && $fields{h} =~ /Authentication-Results/i) {
|
||||
return;
|
||||
|
Loading…
Reference in New Issue
Block a user