* lisp/edmacro.el (edmacro-sanitize-for-string):
This condition should not have been 'repaired' but removed altogether.
Do so now, fixing bug#61647.
Reported by Eduardo Ochs.
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) 0)
- (setf (aref seq i) (logand (aref seq i) 127))))
+ (setf (aref seq i) (logand (aref seq i) 127)))
seq)
;; These are needed in a --without-x build.