[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 1fa90f7 1/3: Change how #:uninterned symbols are font-locked in L
From: |
Lars Ingebrigtsen |
Subject: |
master 1fa90f7 1/3: Change how #:uninterned symbols are font-locked in Lisp mode |
Date: |
Mon, 24 Aug 2020 10:44:34 -0400 (EDT) |
branch: master
commit 1fa90f77ede33a9b988072173ec10c4364b24192
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
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).
---
lisp/emacs-lisp/lisp-mode.el | 4 +---
1 file changed, 1 insertion(+), 3 deletions(-)
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index 584ed8c..352210f 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))