summaryrefslogtreecommitdiff
path: root/lisp/help.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2022-09-13 16:14:37 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2022-09-13 16:14:57 +0200
commit7e374b96635ce70f574fba351defc765e9a52da9 (patch)
treeb38e30997448574760bf12979350ec575b4bd3fc /lisp/help.el
parent48c562fb748623ed01385eaf215333a6c2edac80 (diff)
downloademacs-7e374b96635ce70f574fba351defc765e9a52da9.tar.gz
Fix help--analyze-key problem when not called from menu
* lisp/help.el (help--analyze-key): Don't bug out when not called from the menu.
Diffstat (limited to 'lisp/help.el')
-rw-r--r--lisp/help.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/help.el b/lisp/help.el
index 92b87cf7999..a95bbaa4ae2 100644
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -725,7 +725,8 @@ in the selected window."
;; is selected from the context menu that should describe KEY
;; at the position of mouse click that opened the context menu.
;; When no mouse was involved, don't use `posn-set-point'.
- (defn (if buffer
+ (defn (if (or buffer
+ (not (consp (event-end event))))
(key-binding key t)
(save-excursion (posn-set-point (event-end event))
(key-binding key t)))))