procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/emacs-lisp/lisp-mode.el (lisp-fdefs): Fix font-lock (bug#74307).

Browse source 
Move '(not "\\")' inside the group to not exclude the last character
for "\\<>" and similar constructs.
This commit is contained in:
Juri Linkov 2024-12-05 20:15:12 +02:00
parent ed9eaaa996
commit 61d0676297
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/emacs-lisp/lisp-mode.el
View file

@ -491,16 +491,16 @@ This will generate compile-time constants from BINDINGS."
;; Words inside \\[], \\<>, \\{} or \\`' tend to be for
;; `substitute-command-keys'.
(,(rx "\\\\" (or (seq "["
(group-n 1 lisp-mode-symbol) (not "\\") "]")
(group-n 1 (seq lisp-mode-symbol (not "\\"))) "]")
(seq "`" (group-n 1
;; allow multiple words, e.g. "C-x a"
lisp-mode-symbol (* " " lisp-mode-symbol))
"'")))
(1 font-lock-constant-face prepend))
(,(rx "\\\\" (or (seq "<"
(group-n 1 lisp-mode-symbol) (not "\\") ">")
(group-n 1 (seq lisp-mode-symbol (not "\\"))) ">")
(seq "{"
(group-n 1 lisp-mode-symbol) (not "\\") "}")))
(group-n 1 (seq lisp-mode-symbol (not "\\"))) "}")))
(1 font-lock-variable-name-face prepend))
;; Ineffective backslashes (typically in need of doubling).
("\\(\\\\\\)\\([^\"\\]\\)"