Blacklist feature request

[Steve Freegard]

Thanks Julian - that's brilliant, works perfect.

Cheers,
Steve.

-----Original Message-----
From: Julian Field [mailto:mailscanner at ECS.SOTON.AC.UK]
Sent: 17 November 2003 17:40
To: MAILSCANNER at JISCMAIL.AC.UK
Subject: Re: Blacklist feature request


At 17:27 17/11/2003, you wrote:
>Hi Julian,
>
>There's already a $message->{spamwhitelisted} variable within the
>message object for the 'Is Definitly Not Spam' setting, but there isn't
>a corresponding $message->{spamblacklisted} for the 'Is Definitely
>Spam' option (or if there is I couldn't find it) - can this be added??

Sure thing. Apply this to Message.pm:

--- Message.pm.old 2003-11-14 17:09:41.000000000 +0000
+++ Message.pm  2003-11-17 17:36:49.000000000 +0000
@@ -77,6 +77,7 @@
  # $workarea            set by new
  # @archiveplaces       set by new (addresses and dirs)
  # $spamwhitelisted      set by IsSpam
+# $spamblacklisted      set by IsSpam
  # $isspam               set by IsSpam
  # $issaspam             set by IsSpam
  # $isrblspam            set by IsSpam
@@ -282,11 +283,13 @@
    $todomain = join(',', keys %todomain);

    # $spamwhitelisted      set by IsSpam
+  # $spamblacklisted      set by IsSpam
    # $isspam               set by IsSpam
    # $ishigh               set by IsSpam
    # $spamreport           set by IsSpam

    $this->{spamwhitelisted} = 0;
+  $this->{spamblacklisted} = 0;
    $this->{isspam} = 0;
    $this->{ishigh} = 0;
    $this->{spamreport} = "";
@@ -321,6 +324,7 @@

    # If it's a blacklisted address, don't bother doing any checks at all
    if (MailScanner::Config::Value('spamblacklist', $this)) {
+    $this->{spamblacklisted} = 1;
      $this->{isspam} = 1;
      $this->{ishigh} = 1
        if MailScanner::Config::Value('blacklistedishigh', $this);

--
Julian Field
www.MailScanner.info
Professional Support Services at www.MailScanner.biz MailScanner thanks
transtec Computers for their support PGP footprint: EE81 D763 3DB0 0BFD E1DC
7222 11F6 5947 1415 B654

--
This email and any files transmitted with it are confidential and
intended solely for the use of the individual or entity to whom they
are addressed. If you have received this email in error please notify
the sender and delete the message from your mailbox.

This footnote also confirms that this email message has been swept by
MailScanner (www.mailscanner.info) for the presence of computer viruses.