From: Eli Zaretskii <eliz@gnu.org>
Date: Wed, 24 Apr 2024 07:02:22 +0000 (+0300)
Subject: Fix handling of glyph codes in whitespace.el
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=06ebe6bf9978d0f173b236d986a66b3f5aec6069;p=emacs.git

Fix handling of glyph codes in whitespace.el

* lisp/whitespace.el (whitespace-display-vector-p): Support glyph
codes, not just plain characters.  See
https://lists.gnu.org/archive/html/help-gnu-emacs/2024-04/msg00248.html
for the details.

(cherry picked from commit 3bf9a047427aab554ce228250a796fa327d9b353)
---

diff --git a/lisp/whitespace.el b/lisp/whitespace.el
index 15c1b83fcc1..bc23a8794eb 100644
--- a/lisp/whitespace.el
+++ b/lisp/whitespace.el
@@ -2474,7 +2474,7 @@ purposes)."
   (let ((i (length vec)))
     (when (> i 0)
       (while (and (>= (setq i (1- i)) 0)
-		  (whitespace-char-valid-p (aref vec i))))
+		  (whitespace-char-valid-p (glyph-char (aref vec i)))))
       (< i 0))))