summaryrefslogtreecommitdiff
path: root/lisp/edmacro.el
diff options
context:
space:
mode:
authorErik Naggum <erik@naggum.no>1997-02-05 01:33:07 +0000
committerErik Naggum <erik@naggum.no>1997-02-05 01:33:07 +0000
commit094e8ee4ac55b3da65f56d300b0421c75dd2452a (patch)
tree6d68422f12a6ce7c4df2b0dc3e253f9f8190d4c2 /lisp/edmacro.el
parent96c188b08ca4329bec2d6538a7c868cc943f1914 (diff)
downloademacs-094e8ee4ac55b3da65f56d300b0421c75dd2452a.tar.gz
(edmacro-parse-keys): Remove redundant test for ?.
Diffstat (limited to 'lisp/edmacro.el')
-rw-r--r--lisp/edmacro.el3
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."
;; and C-? is not used (we use DEL instead).
(string-match "[@-_a-z]" word))
(setq key (list (+ bits (- ?\C-\^@)
- (if (equal word "?") 127
- (logand (aref word 0) 31))))))
+ (logand (aref word 0) 31)))))
(t
(setq key (list (+ bits (aref word 0)))))))))
(when key