yasnippet.el (yas--font-lock-keywords): Avoid font-lock-*-face vars

This commit is contained in:
Stefan Monnier 2025-01-12 10:04:11 -05:00
parent 37d0b2790f
commit 03b1b11547

View File

@ -1000,7 +1000,7 @@ Honour `yas-dont-activate-functions', which see."
;;; Major mode stuff ;;; Major mode stuff
(defvar yas--font-lock-keywords (defvar yas--font-lock-keywords
(append '(("^#.*$" . font-lock-comment-face)) (append '(("^#.*$" (0 'font-lock-comment-face)))
(with-temp-buffer (with-temp-buffer
(let ((prog-mode-hook nil) (let ((prog-mode-hook nil)
(emacs-lisp-mode-hook nil)) (emacs-lisp-mode-hook nil))
@ -1011,14 +1011,14 @@ Honour `yas-dont-activate-functions', which see."
(cadr font-lock-keywords) (cadr font-lock-keywords)
font-lock-keywords)) font-lock-keywords))
'(("\\$\\([0-9]+\\)" '(("\\$\\([0-9]+\\)"
(0 font-lock-keyword-face) (0 'font-lock-keyword-face)
(1 font-lock-string-face t)) (1 'font-lock-string-face t))
("\\${\\([0-9]+\\):?" ("\\${\\([0-9]+\\):?"
(0 font-lock-keyword-face) (0 'font-lock-keyword-face)
(1 font-lock-warning-face t)) (1 'font-lock-warning-face t))
("\\(\\$(\\)" 1 font-lock-preprocessor-face) ("\\(\\$(\\)" 1 'font-lock-preprocessor-face)
("}" ("}"
(0 font-lock-keyword-face))))) (0 'font-lock-keyword-face)))))
(defvar snippet-mode-map (defvar snippet-mode-map
(let ((map (make-sparse-keymap))) (let ((map (make-sparse-keymap)))