From: Mauro Aranda <maurooaranda@gmail.com>
Date: Thu, 17 Sep 2020 21:46:24 +0000 (+0200)
Subject: Fix recent change in wid-edit
X-Git-Tag: emacs-28.0.90~6025
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3b3cf6c588f335ae046e4619d4f4f4ce29658c52;p=emacs.git

Fix recent change in wid-edit

* lisp/wid-edit.el (widget-button--check-and-call-button): Record the
ending position of event, because we might need it when
the :mouse-down-action function returns non-nil (bug#20664).
---

diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index 8be489bf08b..5ac52777f84 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -978,7 +978,8 @@ If nil, point returns to its original position after invoking a button.")
 If nothing was called, return non-nil."
   (let* ((oevent event)
          (mouse-1 (memq (event-basic-type event) '(mouse-1 down-mouse-1)))
-         newpoint pos)
+         (pos (widget-event-point event))
+         newpoint)
     (catch 'button-press-cancelled
       ;; Mouse click on a widget button.  Do the following
       ;; in a save-excursion so that the click on the button