From e33f094113546da0ee95a7aa4e2f21e2d4638ac1 Mon Sep 17 00:00:00 2001 From: Erik Naggum Date: Wed, 5 Feb 1997 01:33:07 +0000 Subject: (edmacro-parse-keys): Remove redundant test for ?. --- lisp/edmacro.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'lisp/edmacro.el') 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 -- cgit v1.2.1