Function: newsticker--group-do-find-group

newsticker--group-do-find-group is a byte-compiled function defined in newst-treeview.el.gz.

Signature

(newsticker--group-do-find-group FEED-OR-GROUP-NAME PARENT-NODE NODE)

Documentation

Recursively find FEED-OR-GROUP-NAME in PARENT-NODE or NODE.

Source Code

;; Defined in /usr/src/emacs/lisp/net/newst-treeview.el.gz
;; ======================================================================
;;; Groups
;; ======================================================================
(defun newsticker--group-do-find-group (feed-or-group-name parent-node node)
  "Recursively find FEED-OR-GROUP-NAME in PARENT-NODE or NODE."
  (cond ((stringp node)
         (when (string= feed-or-group-name node)
           (throw 'found parent-node)))
        ((listp node)
         (cond ((string= feed-or-group-name (car node))
                (throw 'found parent-node))
               ((member feed-or-group-name (cdr node))
                (throw 'found node))
               (t
                (mapc (lambda (n)
                        (if (listp n)
                            (newsticker--group-do-find-group
                             feed-or-group-name node n)))
                      (cdr node)))))))