emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 2d2c448efe: Fix forward-sexp for Unicode names in Emacs Lisp mode


From: Lars Ingebrigtsen
Subject: master 2d2c448efe: Fix forward-sexp for Unicode names in Emacs Lisp mode
Date: Fri, 6 May 2022 12:38:23 -0400 (EDT)

branch: master
commit 2d2c448efe9ef02e60a24e10918bbc18213da242
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Fix forward-sexp for Unicode names in Emacs Lisp mode
    
    * lisp/progmodes/elisp-mode.el (elisp-mode-syntax-propertize):
    Make forward-sexp work for Unicode character names (bug#23354).
---
 lisp/progmodes/elisp-mode.el | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/lisp/progmodes/elisp-mode.el b/lisp/progmodes/elisp-mode.el
index 409055289d..0b647d247b 100644
--- a/lisp/progmodes/elisp-mode.el
+++ b/lisp/progmodes/elisp-mode.el
@@ -244,6 +244,11 @@ Comments in the form will be lost."
     ;; Empty symbol.
     ("##" (0 (unless (nth 8 (syntax-ppss))
                (string-to-syntax "_"))))
+    ;; Unicode character names.  (The longest name is 88 characters
+    ;; long.)
+    ("\\?\\\\N{[-A-Z ]\\{,88\\}}"
+     (0 (unless (nth 8 (syntax-ppss))
+          (string-to-syntax "_"))))
     ((rx "#" (or (seq (group-n 1 "&" (+ digit)) ?\") ; Bool-vector.
                  (seq (group-n 1 "s") "(")           ; Record.
                  (seq (group-n 1 (+ "^")) "[")))     ; Char-table.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]