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

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