diff options
| author | Jim Blandy | 1993-05-03 03:40:40 +0000 |
|---|---|---|
| committer | Jim Blandy | 1993-05-03 03:40:40 +0000 |
| commit | 15e0fbfaff4bdc6f0e5557ef65b5bfac8a753ee3 (patch) | |
| tree | 03340436d0bff888a157761de2d104d01af9a46f | |
| parent | 684602b92eeb5428c3693fde48d660a139eb22fb (diff) | |
| download | emacs-15e0fbfaff4bdc6f0e5557ef65b5bfac8a753ee3.tar.gz emacs-15e0fbfaff4bdc6f0e5557ef65b5bfac8a753ee3.zip | |
* subr.el (listify-key-sequence): Use a character constant to
decide which bits to flip, not an integer constant.
| -rw-r--r-- | lisp/subr.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/subr.el b/lisp/subr.el index 932bf0b96c4..74c8968fc1c 100644 --- a/lisp/subr.el +++ b/lisp/subr.el | |||
| @@ -236,7 +236,7 @@ The normal global definition of the character C-x indirects to this keymap.") | |||
| 236 | (append key nil) | 236 | (append key nil) |
| 237 | (mapcar (function (lambda (c) | 237 | (mapcar (function (lambda (c) |
| 238 | (if (> c 127) | 238 | (if (> c 127) |
| 239 | (logxor c 8388736) | 239 | (logxor c ?\M-\200) |
| 240 | c))) | 240 | c))) |
| 241 | (append key nil)))) | 241 | (append key nil)))) |
| 242 | 242 | ||