Fix description of a remapped command's bindings
* lisp/help-fns.el (help-fns--key-bindings): Qualify the description of any menu-bar bindings by remapping. (Bug#78391)
This commit is contained in:
@@ -624,8 +624,15 @@ the C sources, too."
|
||||
(let ((start (point)))
|
||||
(help-fns--insert-menu-bindings
|
||||
menus
|
||||
(concat "It can " (and keys "also ")
|
||||
(concat "It " (if remapped "could " "can ") (and keys "also ")
|
||||
"be invoked from the menu: "))
|
||||
(when remapped
|
||||
(princ ", but that was remapped to ")
|
||||
(princ (if (symbolp remapped)
|
||||
(format-message "`%s'" remapped)
|
||||
"an anonymous command"))
|
||||
(princ "as well.\n"))
|
||||
(or remapped (princ "."))
|
||||
(fill-region-as-paragraph start (point))))
|
||||
(ensure-empty-lines)))))))
|
||||
|
||||
|
||||
Reference in New Issue
Block a user