Fix detection of spam via X-Spam-Status header

http://www.virtualmin.com/node/17856
This commit is contained in:
Jamie Cameron
2011-04-14 14:20:52 -07:00
parent 67bdfa2565
commit 7a9c9996f2

View File

@@ -89,8 +89,8 @@ if ($spam) {
$isspam = undef;
open(SPAMOUT, $temp);
while(<SPAMOUT>) {
if (/^X-Spam-Status:\s+(\S+)/i) {
$isspam = lc($1) eq 'yes' ? 1 : 0;
if (/^X-Spam-Status:\s+Yes/i) {
$isspam = 1;
last;
}
last if (!/\S/);