diff options
| author | Juri Linkov <juri@linkov.net> | 2020-11-01 23:20:53 +0200 |
|---|---|---|
| committer | Juri Linkov <juri@linkov.net> | 2020-11-01 23:20:53 +0200 |
| commit | 43d5b79a6931b169557b5d78f9a7f9be0ab72e77 (patch) | |
| tree | d5e545caa1fb256bbef095375cf3431206da0517 /lisp/descr-text.el | |
| parent | 7baf8cae0f54502fc2b21c01e133308b746cd7a0 (diff) | |
| download | emacs-43d5b79a6931b169557b5d78f9a7f9be0ab72e77.tar.gz emacs-43d5b79a6931b169557b5d78f9a7f9be0ab72e77.tar.bz2 emacs-43d5b79a6931b169557b5d78f9a7f9be0ab72e77.zip | |
Show nobreak-space face for more blank characters in describe-char.
* lisp/descr-text.el (describe-char): Handle more non-ASCII whitespace
characters added in f018cffca0098ad1b82c51730a6d6cf146e3c488 (bug#44236)
Diffstat (limited to 'lisp/descr-text.el')
| -rw-r--r-- | lisp/descr-text.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/descr-text.el b/lisp/descr-text.el index ec9a9680137..075cb21c21a 100644 --- a/lisp/descr-text.el +++ b/lisp/descr-text.el @@ -687,7 +687,8 @@ The character information includes: (save-excursion (goto-char pos) (looking-at-p "[ \t]+$"))) 'trailing-whitespace) - ((and nobreak-char-display char (eq char '#xa0)) + ((and nobreak-char-display char + (eq (get-char-code-property char 'general-category) 'Zs)) 'nobreak-space) ((and nobreak-char-display char (memq char '(#xad #x2010 #x2011))) |