mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-12 10:44:12 -08:00
Code Issues Projects Releases Wiki Activity

Generate touch-end events on pgtk

Browse source 
* src/pgtkterm.c (scroll_event): Generate touch end events.
This commit is contained in:
Po Lu 2021-12-03 10:29:41 +08:00
parent 054319e9fd
commit f17d0dfb3e
1 changed files with 7 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

7
src/pgtkterm.c
View file

@ -6008,6 +6008,13 @@ scroll_event (GtkWidget * widget, GdkEvent * event, gpointer * user_data)
XSETFRAME (inev.ie.frame_or_window, f);
inev.ie.arg = Qnil;
if (gdk_event_is_scroll_stop_event (event))
{
inev.ie.kind = TOUCH_END_EVENT;
evq_enqueue (&inev);
return TRUE;
}
if (gdk_event_get_scroll_direction (event, &dir))
{
switch (dir)