I modified the last line of spam_assassin_status to deal with the SA bug:


sub spam_assassin_status (;$) {

   my $object = spam_assassin_init(@_);
   return undef unless $object;

   my $mail = spam_assassin_mail();
   return undef unless $mail;

   # [KAP] hack to deal with lost umask in SA 3.0.0-rc1
   my $umask = umask();
   my $status = $object->check($mail);
   umask($umask);

   return $status;
}

_______________________________________________
Visit http://www.mimedefang.org and http://www.canit.ca
MIMEDefang mailing list
[EMAIL PROTECTED]
http://lists.roaringpenguin.com/mailman/listinfo/mimedefang

Reply via email to