changeset 16977:e97bdda07a30

(edmacro-parse-keys): Remove redundant test for ?.
author Erik Naggum <erik@naggum.no>
date Wed, 05 Feb 1997 01:33:07 +0000
parents c7683cba14c7
children 71aff157cff2
files lisp/edmacro.el
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/edmacro.el	Wed Feb 05 01:32:44 1997 +0000
+++ b/lisp/edmacro.el	Wed Feb 05 01:33:07 1997 +0000
@@ -698,8 +698,7 @@
 			     ;; 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