diff options
| author | Po Lu <luangruo@yahoo.com> | 2025-02-12 11:16:54 +0800 |
|---|---|---|
| committer | Po Lu <luangruo@yahoo.com> | 2025-02-12 11:16:54 +0800 |
| commit | 02485d2982875b309ef93708c3b2d6aa59a1195b (patch) | |
| tree | b34fe711450657679a2fa5a7c34f39203416c263 /lisp/emacs-lisp | |
| parent | 82384aaef0eb2317fd8249a42a3521aa2c479b08 (diff) | |
| parent | 32700f38fdd279cb79e3b78b35cb8666f5cd08a7 (diff) | |
| download | emacs-02485d2982875b309ef93708c3b2d6aa59a1195b.tar.gz emacs-02485d2982875b309ef93708c3b2d6aa59a1195b.tar.bz2 emacs-02485d2982875b309ef93708c3b2d6aa59a1195b.zip | |
Merge remote-tracking branch 'savannah/master' into master-android-1
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/lisp-mode.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index 1349a5212ed..9bed4374dff 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -559,7 +559,9 @@ This will generate compile-time constants from BINDINGS." (,(concat "(" cl-errs-re "\\_>") (1 font-lock-warning-face)) ;; Words inside ‘’ and `' tend to be symbol names. - (,(concat "[`‘]\\(" (rx lisp-mode-symbol) "\\)['’]") + (,(concat "[`‘]\\(" + (rx (* lisp-mode-symbol (+ space)) lisp-mode-symbol) + "\\)['’]") (1 font-lock-constant-face prepend)) ;; Uninterned symbols, e.g., (defpackage #:my-package ...) ;; must come before keywords below to have effect |