Fix noninteractive gnus-article-press-button

* lisp/gnus/gnus-art.el (gnus-article-press-button): Make the `b'
summary mode command work again.
This commit is contained in:
Lars Ingebrigtsen 2021-02-08 07:11:52 +01:00
parent 7d4d577ed1
commit efb10ffdb7

View file

@ -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))))))