summaryrefslogtreecommitdiff
path: root/lisp/help.el
diff options
context:
space:
mode:
authorChong Yidong <cyd@stupidchicken.com>2010-07-06 15:42:46 -0400
committerChong Yidong <cyd@stupidchicken.com>2010-07-06 15:42:46 -0400
commite8579ebc1540c34d90c238d6e649387c840ceb04 (patch)
treee00179e312b6ad3dc2b23598eac2e64bc5b83b5c /lisp/help.el
parent9d70a3fc8ee03ee1eb9add17ef6ae04aedce9653 (diff)
downloademacs-e8579ebc1540c34d90c238d6e649387c840ceb04.tar.gz
Minor fix to describe-key, and a docstring.
* help.el (describe-key): Print up-event using key-description. * mouse.el (mouse-appearance-menu): Add docstring.
Diffstat (limited to 'lisp/help.el')
-rw-r--r--lisp/help.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/help.el b/lisp/help.el
index 0c231a78b91..acfd78b301f 100644
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -768,9 +768,10 @@ temporarily enables it to allow getting help on disabled items and buttons."
----------------- up-event %s----------------
-<%S>%s%s runs the command %S, which is "
+%s%s%s runs the command %S, which is "
(if mouse-1-tricky "(short click) " "")
- ev-type mouse-msg
+ (key-description (vector up-event))
+ mouse-msg
(if mouse-1-remapped
" is remapped to <mouse-2>, which" "")
defn-up))