Function: spam-stat-buffer-is-non-spam

spam-stat-buffer-is-non-spam is a byte-compiled function defined in spam-stat.el.gz.

Signature

(spam-stat-buffer-is-non-spam)

Documentation

Consider current buffer to be a new non-spam mail.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/spam-stat.el.gz
(defun spam-stat-buffer-is-non-spam ()
  "Consider current buffer to be a new non-spam mail."
  (setq spam-stat-ngood (1+ spam-stat-ngood))
  (maphash
   (lambda (word count)
     (let ((entry (gethash word spam-stat)))
       (if entry
	   (spam-stat-set-good entry (+ count (spam-stat-good entry)))
	 (setq entry (spam-stat-make-entry count 0)))
       (spam-stat-set-score entry (spam-stat-compute-score entry))
       (puthash word entry spam-stat)))
   (spam-stat-buffer-words))
  (setq spam-stat-dirty t))