Function: treesit-fold--is-face

treesit-fold--is-face is a natively compiled function defined in treesit-fold-util.el.

Signature

(treesit-fold--is-face OBJ LST-FACE &optional TRIM)

Documentation

Return non-nil if OBJ's face is define inside list LST-FACE.

Optional argument TRIM, see function treesit-fold--get-face.

Source Code

;; Defined in /nix/store/mpy1l6b4hlzpp59l4vbahq83hqa821ci-emacs-packages-deps/share/emacs/site-lisp/elpa/treesit-fold-0.2.1/treesit-fold-util.el
(defun treesit-fold--is-face (obj lst-face &optional trim)
  "Return non-nil if OBJ's face is define inside list LST-FACE.
Optional argument TRIM, see function `treesit-fold--get-face'."
  (unless (listp lst-face) (setq lst-face (list lst-face)))
  (let ((faces (treesit-fold--get-face obj trim)))
    (cond ((listp faces)
           (cl-some (lambda (face) (memq face lst-face)) faces))
          (t (memq faces lst-face)))))