]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix recent change in wid-edit
authorMauro Aranda <maurooaranda@gmail.com>
Thu, 17 Sep 2020 21:46:24 +0000 (23:46 +0200)
committerLars Ingebrigtsen <larsi@gnus.org>
Thu, 17 Sep 2020 21:46:24 +0000 (23:46 +0200)
* 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).

lisp/wid-edit.el

index 8be489bf08b33da0f27bc58696098e18ea0f2c1f..5ac52777f8462edbeb1c90d3421440768cdc28ca 100644 (file)
@@ -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