MailScanner/v5
1
1
Fork 0
mirror of https://github.com/MailScanner/v5.git synced 2024-09-20 23:36:24 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

Merge pull request #45 from asuweb/MailWatch-RBL

Browse source 
Adds rblspamreport to returned array for use in custom functions
This commit is contained in:
Jerry Benton 2017-03-18 21:41:29 -04:00 committed by GitHub
parent df1d74a6e6 b9069a9f91
commit b755557d9e
1 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
common/usr/share/MailScanner/perl/MailScanner/Message.pm
View file

@ -89,6 +89,7 @@ $VERSION = substr q$Revision: 5099 $, 10;
# $isspam set by IsSpam
# $issaspam set by IsSpam
# $isrblspam set by IsSpam
# $rblspamreport set by IsSpam
# $ishigh set by IsSpam
# $sascore set by IsSpam
# $spamreport set by IsSpam
@ -722,6 +723,8 @@ sub IsSpam {
# front of the spam report.
$this->{isspam} = 1 if $RBLsaysspam;
$this->{isrblspam} = 1 if $RBLsaysspam;
$this->{rblspamreport} = "";
$this->{rblspamreport} = $rblspamheader if $RBLsaysspam;
$this->{ishigh} = 1 if $rblcounter >= $highrblthreshold;
}
# rblspamheader is useful start to spamreport if RBLsaysspam.