Merge pull request #244 from priyadi/dmarc-fix

Fix DMARC authentication-result string
This commit is contained in:
Matt Simerson 2016-02-16 14:39:37 -08:00
commit 9de7c3778e

View File

@ -154,8 +154,9 @@ sub check_dmarc {
}; };
my $disposition = $dmarc->result->disposition; my $disposition = $dmarc->result->disposition;
my $auth_str = "dmarc=$disposition"; my $result = $dmarc->result->result;
$auth_str = " (p=" . $pol->p . ")" if $pol; my $auth_str = "dmarc=$result";
$auth_str .= " (p=" . $pol->p . ")" if $pol;
if ( $dmarc->result->result eq 'pass' ) { if ( $dmarc->result->result eq 'pass' ) {
$self->log(LOGINFO, "pass"); $self->log(LOGINFO, "pass");