Function: treesit-replace-font-lock-feature-settings

treesit-replace-font-lock-feature-settings is a byte-compiled function defined in treesit.el.gz.

Signature

(treesit-replace-font-lock-feature-settings NEW-SETTINGS SETTINGS)

Documentation

Replaces :feature in SETTINGS with :feature from NEW-SETTINGS.

Both SETTINGS and NEW-SETTINGS must be a value suitable for treesit-font-lock-settings. Return a value suitable for treesit-font-lock-settings

Probably introduced at or before Emacs version 31.1.

Source Code

;; Defined in /usr/src/emacs/lisp/treesit.el.gz
(defun treesit-replace-font-lock-feature-settings (new-settings settings)
  "Replaces :feature in SETTINGS with :feature from NEW-SETTINGS.
Both SETTINGS and NEW-SETTINGS must be a value suitable for
`treesit-font-lock-settings'.
Return a value suitable for `treesit-font-lock-settings'"
  (let ((result nil))
    (dolist (new-setting new-settings)
      (let ((new-feature (treesit-font-lock-setting-feature new-setting))
            (new-lang (treesit-font-lock-setting-language new-setting)))
        (dolist (setting settings)
          (let ((feature (treesit-font-lock-setting-feature setting))
                (lang (treesit-font-lock-setting-language setting)))
            (if (and (eq new-lang lang) (eq new-feature feature))
                (push new-setting result)
              (push setting result))))))
    (nreverse result)))