(edmacro-parse-keys): Remove redundant test for ?.

1997-02-05 01:33:07 +00:00
parent 96c188b08c
commit 094e8ee4ac
1 changed files with 1 additions and 2 deletions
--- 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