From 43d5b79a6931b169557b5d78f9a7f9be0ab72e77 Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Sun, 1 Nov 2020 23:20:53 +0200 Subject: [PATCH] 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) --- lisp/descr-text.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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))) -- 2.39.2