From: Mattias Engdegård <mattiase@acm.org>
Date: Fri, 19 Aug 2022 11:27:53 +0000 (+0200)
Subject: * lisp/edmacro.el (edmacro-sanitize-for-string): Fix condition.
X-Git-Tag: emacs-29.0.90~1447^2~49
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e5695faec4a43f10be3b56fa7fd436d5f54a5761;p=emacs.git

* lisp/edmacro.el (edmacro-sanitize-for-string): Fix condition.

This is of little consequence in practice since the input is always a
vector of keys representing a prefix, where bit 7 isn't likely to be
set when higher bits are set, but it silences a (justified) warning.
---

diff --git a/lisp/edmacro.el b/lisp/edmacro.el
index efffab9b30b..26a5d2347f0 100644
--- a/lisp/edmacro.el
+++ b/lisp/edmacro.el
@@ -626,7 +626,7 @@ The string represents the same events; Meta is indicated by bit 7.
 This function assumes that the events can be stored in a string."
   (setq seq (copy-sequence seq))
   (cl-loop for i below (length seq) do
-           (when (logand (aref seq i) 128)
+           (when (/= (logand (aref seq i) 128) 0)
              (setf (aref seq i) (logand (aref seq i) 127))))
   seq)