Function: spam-log-unregistration-needed-p

spam-log-unregistration-needed-p is a byte-compiled function defined in spam.el.gz.

Signature

(spam-log-unregistration-needed-p ID TYPE CLASSIFICATION BACKEND)

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/spam.el.gz
;; check if a ham- or spam-processor registration needs to be undone
(defun spam-log-unregistration-needed-p (id type classification backend)
  (when spam-log-to-registry
    (if (and (stringp id)
             (spam-process-type-valid-p type)
             (spam-classification-valid-p classification)
             (spam-backend-valid-p backend))
        (let ((cell-list (gnus-registry-get-id-key id type))
              found)
          (dolist (cell cell-list)
            (unless found
              (when (and (eq classification (nth 0 cell))
                         (eq backend (nth 1 cell)))
                (setq found t))))
          found)
      (progn
        (gnus-error
         7
         (format "%s called with bad ID, type, classification, or spam-backend"
                 "spam-log-unregistration-needed-p"))
        nil))))