procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

; Fix push-button when triggered by a single keypress

Browse source 
* lisp/button.el (push-button): Don't assume the event is
a list, it may be a single key.  (Bug#65539)
This commit is contained in:
Steven Allen 2023-08-25 10:43:43 -07:00 • committed by Eli Zaretskii
parent 017bf0f99a
commit b69561e5a4
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/button.el
View file

@ -492,7 +492,7 @@ pushing a button, use the `button-describe' command."
(if str-button
;; mode-line, header-line, or display string event.
(button-activate str t)
(if (eq (car pos) 'touchscreen-down)
(if (eq (car-safe pos) 'touchscreen-down)
;; If touch-screen-track tap returns nil, then the
;; tap was cancelled.
(when (touch-screen-track-tap pos)