Mercurial > emacs
changeset 10694:75792481da0c
(te-pass-through): Don't presume internal bit layout of non-ASCII keys.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Wed, 08 Feb 1995 03:52:28 +0000 |
| parents | 0875851842f0 |
| children | 1a97dea087d1 |
| files | lisp/terminal.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/terminal.el Wed Feb 08 03:51:58 1995 +0000 +++ b/lisp/terminal.el Wed Feb 08 03:52:28 1995 +0000 @@ -435,7 +435,7 @@ (setq last-input-char (get last-input-char 'ascii-character))) ;; Convert meta characters to 8-bit form for transmission. (if (and (integerp last-input-char) - (not (zerop (logand last-input-char (lsh 1 23))))) + (not (zerop (logand last-input-char ?\M-\^@)))) (setq last-input-char (+ 128 (logand last-input-char 127)))) ;; Now ignore all but actual characters. ;; (It ought to be possible to send through function