summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2021-02-08 07:11:52 +0100
committerLars Ingebrigtsen <larsi@gnus.org>2021-02-08 07:11:52 +0100
commitefb10ffdb75ba61353b3451797e0214ac2f03171 (patch)
treef2e390d7494753b3521b2aa11f8c61c9733f150c
parent7d4d577ed14fb2519ea2eaecb11c8ecff658f147 (diff)
downloademacs-efb10ffdb75ba61353b3451797e0214ac2f03171.tar.gz
Fix noninteractive gnus-article-press-button
* lisp/gnus/gnus-art.el (gnus-article-press-button): Make the `b' summary mode command work again.
-rw-r--r--lisp/gnus/gnus-art.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index 70ededf1ba1..7ded9e40e99 100644
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -7894,7 +7894,8 @@ If the text at point has a `gnus-callback' property,
call it with the value of the `gnus-data' text property."
(interactive (list last-nonmenu-event))
(save-excursion
- (mouse-set-point event)
+ (when event
+ (mouse-set-point event))
(let ((fun (get-text-property (point) 'gnus-callback)))
(when fun
(funcall fun (get-text-property (point) 'gnus-data))))))