From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 9 May 1997 06:31:04 +0000 (+0000)
Subject: (read-quoted-char): Don't mask down to 8 bits.
X-Git-Tag: emacs-20.1~2238
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=637b47089a15630a429bc81f660f5ff6bcc18362;p=emacs.git

(read-quoted-char): Don't mask down to 8 bits.
---

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.