[SACVS] CVS: spamassassin/lib/Mail SpamAssassin.pm,1.213,1.214

Update of /cvsroot/spamassassin/spamassassin/lib/Mail
In directory sc8-pr-cvs1:/tmp/cvs-serv2276/lib/Mail

Modified Files:
        SpamAssassin.pm 
Log Message:
bug 2459: more work on reorganizing auto-whitelist implementation


Index: SpamAssassin.pm
===================================================================
RCS file: /cvsroot/spamassassin/spamassassin/lib/Mail/SpamAssassin.pm,v
retrieving revision 1.213
retrieving revision 1.214
diff -b -w -u -d -r1.213 -r1.214
--- SpamAssassin.pm     23 Sep 2003 14:45:50 -0000      1.213
+++ SpamAssassin.pm     25 Sep 2003 03:11:23 -0000      1.214
@@ -1216,6 +1216,23 @@
 
   $self->init_learner({ 'learn_to_journal' => 
$self->{conf}->{bayes_learn_to_journal} });
 
+  if ($self->{conf}->{auto_whitelist_factory}) {
+    my $factory;
+    my $type = $self->{conf}->{auto_whitelist_factory};
+    if ($type =~ /^([_A-Za-z0-9:]+)$/) {
+      $type = $1;
+      eval '
+       require '.$type.';
+       $factory = '.$type.'->new();
+      ';
+      if ($@) { warn $@; undef $factory; }
+    }
+    else {
+      warn "illegal auto_whitelist_factory setting\n";
+    }
+    $self->set_persistent_address_list_factory($factory) if defined $factory;
+  }
+
   if ($self->{only_these_rules}) {
     $self->trim_rules($self->{only_these_rules});
   }



-------------------------------------------------------
This sf.net email is sponsored by:ThinkGeek
Welcome to geek heaven.
http://thinkgeek.com/sf