martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix mouse wheel scroll direction on pgtk

Browse Source 
* src/pgtkterm.c (scroll_event): Fix scroll modifiers when
`mwheel-coalesce-scroll-events' is nil.
This commit is contained in:
Po Lu
2022-01-02 15:13:37 +08:00
parent ad125a9927
commit 01615b24da
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/pgtkterm.c
View File

@@ -6264,9 +6264,9 @@ scroll_event (GtkWidget * widget, GdkEvent * event, gpointer * user_data)
? HORIZ_WHEEL_EVENT
: WHEEL_EVENT);
inev.ie.modifiers |= (inev.ie.kind == HORIZ_WHEEL_EVENT
? (delta_x >= 0 ? down_modifier : up_modifier)
? (delta_x >= 0 ? up_modifier : down_modifier)
: (delta_y >= 0 ? down_modifier : up_modifier));
inev.ie.arg = list3 (Qnil, make_float (delta_x * 100),
inev.ie.arg = list3 (Qnil, make_float (-delta_x * 100),
make_float (-delta_y * 100));
}
else