Just remove the check lines that jm added -- ie check_whitelist becomes:
#!/usr/bin/perl
use warnings ;
use strict ;
use Fcntl;
use AnyDBM_File ;
use vars qw( %h $k $v ) ;
my $db = $ENV{HOME}."/.spamassassin/auto-whitelist"; # is this right?
tie %h, "AnyDBM_File",$db, O_RDWR|O_CREAT|O_EXCL,0600
or die "Cannot open file $db: $!\n";
my @k = grep(!/totscore$/,keys(%h));
for my $key (@k)
{
my $t = $h{"$key|totscore"};
my $v = $h{$key};
if(defined($t)) { printf "%-40.40s -> % 2.1f
%s\n",$key,$t/$v,"($t/$v)"; };
}
untie %h;
On Mon, 2002-03-04 at 06:53, Tony Hoyle wrote:
> My version of libdb seems to be creating different files. My whitelist
> directory (in /var/spool/spamassassin) has two files, one a .dir and the
> other
> a .pag. I have deleted them, re-installed SA and they come back.
> check_whitelist
> however expects a single .db file... How do I either (a) make SA create the
>
> correct files, or (b) alter check_whitelist so it works with .dir/.pag
> files?
>
> Tony
>
> --
>
> #define QUESTION ((bb) || !(bb)) - Shakespeare
>
> [EMAIL PROTECTED]
>
>
> _______________________________________________
> Spamassassin-talk mailing list
> [EMAIL PROTECTED]
> https://lists.sourceforge.net/lists/listinfo/spamassassin-talk
>
>
_______________________________________________
Spamassassin-talk mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/spamassassin-talk
