From 637b47089a15630a429bc81f660f5ff6bcc18362 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 9 May 1997 06:31:04 +0000 Subject: [PATCH] (read-quoted-char): Don't mask down to 8 bits. --- lisp/subr.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/subr.el b/lisp/subr.el index ccd08a52cd0..a4ad6937f43 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -639,7 +639,7 @@ or three octal digits representing its character code.")) (t (setq code char count 259)))) ;; Turn a meta-character into a character with the 0200 bit set. (logior (if (/= (logand code ?\M-\^@) 0) 128 0) - (logand 255 code)))) + code))) (defun force-mode-line-update (&optional all) "Force the mode-line of the current buffer to be redisplayed. -- 2.39.5