master efb10ff: Fix noninteractive gnus-article-press-button

[Lars Ingebrigtsen]

branch: master
commit efb10ffdb75ba61353b3451797e0214ac2f03171
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Fix noninteractive gnus-article-press-button
    
    * lisp/gnus/gnus-art.el (gnus-article-press-button): Make the `b'
    summary mode command work again.
---
 lisp/gnus/gnus-art.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index 70ededf..7ded9e4 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))))))