[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#51173: 28.0.60; gnus-article-describe-key doesn't work
From: |
Stefan Monnier |
Subject: |
bug#51173: 28.0.60; gnus-article-describe-key doesn't work |
Date: |
Mon, 29 Nov 2021 15:57:51 -0500 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/29.0.50 (gnu/linux) |
> mouse-minibuffer-check(19)
> mouse-set-point(19)
> help--analyze-key("\23" [19] nil)
Hpw 'bout the patch below?
Or maybe the use of `mouse-minibuffer-check` in `mouse-set-point` should
be moved to its interactive spec?
Stefan
diff --git a/lisp/help.el b/lisp/help.el
index 1917ef425d..e175421d02 100644
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -715,7 +715,8 @@ help--analyze-key
(and (not (windowp (posn-window (event-start event))))
(not (framep (posn-window (event-start event))))))
(key-binding key t)
- (save-excursion (mouse-set-point event) (key-binding key
t)))))
+ (save-excursion (posn-set-point (event-end event))
+ (key-binding key t)))))
;; Handle the case where we faked an entry in "Select and Paste" menu.
(when (and (eq defn nil)
(stringp (aref key (1- (length key))))