diff options
| -rw-r--r-- | lisp/edmacro.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/edmacro.el b/lisp/edmacro.el index b61cc559fd2..150160c802d 100644 --- a/lisp/edmacro.el +++ b/lisp/edmacro.el | |||
| @@ -698,8 +698,7 @@ If START or END is negative, it counts from the end." | |||
| 698 | ;; and C-? is not used (we use DEL instead). | 698 | ;; and C-? is not used (we use DEL instead). |
| 699 | (string-match "[@-_a-z]" word)) | 699 | (string-match "[@-_a-z]" word)) |
| 700 | (setq key (list (+ bits (- ?\C-\^@) | 700 | (setq key (list (+ bits (- ?\C-\^@) |
| 701 | (if (equal word "?") 127 | 701 | (logand (aref word 0) 31))))) |
| 702 | (logand (aref word 0) 31)))))) | ||
| 703 | (t | 702 | (t |
| 704 | (setq key (list (+ bits (aref word 0))))))))) | 703 | (setq key (list (+ bits (aref word 0))))))))) |
| 705 | (when key | 704 | (when key |