master ac0027f6a5: Remove dead branch from substitute-command-keys

[Stefan Kangas]

branch: master
commit ac0027f6a5480bd4739fdf71413a19012f400483
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    Remove dead branch from substitute-command-keys
    
    * lisp/help.el (substitute-command-keys): Remove dead branch;
    where-is-internal will follow any remaps for us.  Note also that the
    test case for remapping still pass.
---
 lisp/help.el | 8 --------
 1 file changed, 8 deletions(-)

diff --git a/lisp/help.el b/lisp/help.el
index d7ee1a84a4..abe17fa4ce 100644
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -1192,14 +1192,6 @@ Otherwise, return a new string."
                 (let* ((fun (intern (buffer-substring (point) (1- end-point))))
                        (key (with-current-buffer orig-buf
                               (where-is-internal fun keymap t))))
-                  ;; If this a command remap, we need to follow it.
-                  (when (and (vectorp key)
-                             (> (length key) 1)
-                             (eq (aref key 0) 'remap)
-                             (symbolp (aref key 1)))
-                    (setq fun (aref key 1))
-                    (setq key (with-current-buffer orig-buf
-                                (where-is-internal fun keymap t))))
                   (if (not key)
                       ;; Function is not on any key.
                       (let ((op (point)))