; Fix widget button press cancellation

* lisp/wid-edit.el (widget-button--check-and-call-button): Throw
nil if a mouse-button-derived press is canceled.  Reported by
David Ponce <da_vid@orange.fr>.
This commit is contained in:
Po Lu 2024-05-01 08:56:23 +08:00
parent b094b2b9dc
commit 294335b230

View file

@ -1153,7 +1153,7 @@ If nothing was called, return non-nil."
(when (and mouse-1 (mouse-movement-p event))
(push event unread-command-events)
(setq event oevent)
(throw 'button-press-cancelled t))
(throw 'button-press-cancelled nil))
(unless (or (integerp event)
(memq (car event)
'(switch-frame select-window))