Which of course has an unhelpful prompt (Describe key:). If the
prompt were to be changed to say something like "Describe event (key,
mouse or menu selection):", it would be more obvious what it can do.
How about this?
*** help.el 07 Aug 2005 13:30:23 -0400 1.284
--- help.el 08 Nov 2005 00:26:58 -0500
***************
*** 606,618 ****
(defun describe-key (key &optional untranslated up-event)
"Display documentation of the function invoked by KEY.
! KEY should be a key sequence--when calling from a program,
! pass a string or a vector.
! If non-nil UNTRANSLATED is a vector of the untranslated events.
! It can also be a number in which case the untranslated events from
! the last key hit are used."
;; UP-EVENT is the up-event that was discarded by reading KEY, or nil.
! (interactive "kDescribe key: \np\nU")
(if (numberp untranslated)
(setq untranslated (this-single-command-raw-keys)))
(save-excursion
--- 606,620 ----
(defun describe-key (key &optional untranslated up-event)
"Display documentation of the function invoked by KEY.
! KEY can be any kind of a key sequence; it can include keyboard events,
! mouse events, and/or menu events. When calling from a program,
! pass KEY as a string or a vector.
!
! If non-nil, UNTRANSLATED is a vector of the correspondinguntranslated events.
! It can also be a number, in which case the untranslated events from
! the last key sequence entered are used."
;; UP-EVENT is the up-event that was discarded by reading KEY, or nil.
! (interactive "kDescribe key (or click or menu item): \np\nU")
(if (numberp untranslated)
(setq untranslated (this-single-command-raw-keys)))
(save-excursion