1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-16 03:43:50 -07:00

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:
Eli Zaretskii 2025-05-13 18:50:31 +03:00
parent b3e280faba
commit ebeeced9e3

View file

@ -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)))))))