Function: newsticker--lists-intersect-p

newsticker--lists-intersect-p is a byte-compiled function defined in newst-backend.el.gz.

Signature

(newsticker--lists-intersect-p LIST1 LIST2)

Documentation

Return t if LIST1 and LIST2 share elements.

Source Code

;; Defined in /usr/src/emacs/lisp/net/newst-backend.el.gz
;; FIXME: Can this be replaced by seq-intersection?
(defun newsticker--lists-intersect-p (list1 list2)
  "Return t if LIST1 and LIST2 share elements."
  (let ((result nil))
    (dolist (elt list1)
      (if (memq elt list2)
          (setq result t)))
    result))