Mercurial > emacs

changeset 43499:5f7255c11791

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(describe-function-1): Use remap-command.
author Kim F. Storm <storm@cua.dk>
date Sat, 23 Feb 2002 22:27:39 +0000
parents ecd03935bb98
children 9f334f15ae09
files lisp/help-fns.el
diffstat 1 files changed, 1 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/help-fns.el	Sat Feb 23 22:26:44 2002 +0000
+++ b/lisp/help-fns.el	Sat Feb 23 22:27:39 2002 +0000
@@ -207,9 +207,7 @@
     (princ ".")
     (terpri)
     (when (commandp function)
-      (let* ((binding (and (symbolp function) (commandp function)
-			   (key-binding function nil t)))
-	     (remapped (and (symbolp binding) (commandp binding) binding))
+      (let* ((remapped (remap-command function))
 	     (keys (where-is-internal
 		   (or remapped function) overriding-local-map nil nil)))
 	(when remapped