Function: combobulate-procedure-apply-has-ancestor

combobulate-procedure-apply-has-ancestor is a natively compiled function defined in combobulate-procedure.el.

Signature

(combobulate-procedure-apply-has-ancestor HAS-ANCESTOR-RULES ACTION-NODE)

Documentation

Determine if ACTION-NODE has an ancestor matching HAS-ANCESTOR-RULES.

Source Code

;; Defined in /nix/store/b5fvrwzi3zvkabyzx0in6gw1cj963z46-emacs-packages-deps/share/emacs/site-lisp/combobulate-procedure.el
(defun combobulate-procedure-apply-has-ancestor (has-ancestor-rules action-node)
  "Determine if ACTION-NODE has an ancestor matching HAS-ANCESTOR-RULES."
  (let ((parents (combobulate-get-parents action-node)))
    (seq-find (lambda (parent)
                (when (member (combobulate-node-type parent)
                              (combobulate-procedure-expand-rules has-ancestor-rules))
                  parent))
              parents)))