procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/help.el (help--analyze-key): Use help-fns-function-name

Browse source
This commit is contained in:
Stefan Monnier 2024-03-21 21:43:38 -04:00
parent a1f8702e83
commit 60c9702972
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/help.el
View file

@ -926,7 +926,9 @@ in the selected window."
(let ((key-desc (help-key-description key untranslated)))
(if (help--binding-undefined-p defn)
(format "%s%s is undefined" key-desc mouse-msg)
(format "%s%s runs the command %S" key-desc mouse-msg defn)))
(format "%s%s runs the command %s" key-desc mouse-msg
(if (symbolp defn) (prin1-to-string defn)
(help-fns-function-name defn)))))
defn event mouse-msg)))
(defun help--filter-info-list (info-list i)