diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2020-08-24 14:34:42 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2020-08-24 14:34:42 +0200 |
| commit | 1fa90f77ede33a9b988072173ec10c4364b24192 (patch) | |
| tree | 4861ec6c4363eebbc55300ed223d1ddadeca0671 /lisp/emacs-lisp | |
| parent | 787b19115378909c472f018629da763407f6e2a0 (diff) | |
| download | emacs-1fa90f77ede33a9b988072173ec10c4364b24192.tar.gz emacs-1fa90f77ede33a9b988072173ec10c4364b24192.tar.bz2 emacs-1fa90f77ede33a9b988072173ec10c4364b24192.zip | |
Change how #:uninterned symbols are font-locked in Lisp mode
* lisp/emacs-lisp/lisp-mode.el (lisp-fdefs): Font-lock
#:uninterned symbols as a single entity instead of #: and
uninterned separately (bug#43001).
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/lisp-mode.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index 584ed8c6f90..352210f859d 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -506,9 +506,7 @@ This will generate compile-time constants from BINDINGS." (1 font-lock-constant-face prepend)) ;; Uninterned symbols, e.g., (defpackage #:my-package ...) ;; must come before keywords below to have effect - (,(concat "\\(#:\\)\\(" lisp-mode-symbol-regexp "\\)") - (1 font-lock-comment-delimiter-face) - (2 font-lock-doc-face)) + (,(concat "#:" lisp-mode-symbol-regexp "") 0 font-lock-builtin-face) ;; Constant values. (,(concat "\\_<:" lisp-mode-symbol-regexp "\\_>") (0 font-lock-builtin-face)) |