* src/pgtkterm.c (scroll_event): Fix scroll delta scale.

diff --git a/src/pgtkterm.c b/src/pgtkterm.c
index 74ecde0979761a3020138af33fbc38273af9a670..74a71b984c5e928da0e29ccf780af5b24f392d51 100644 (file)
--- a/src/pgtkterm.c
+++ b/src/pgtkterm.c
@@ -6141,8 +6141,8 @@ scroll_event (GtkWidget * widget, GdkEvent * event, gpointer * user_data)
          inev.ie.modifiers |= (inev.ie.kind == HORIZ_WHEEL_EVENT
                                ? (delta_x >= 0 ? down_modifier : up_modifier)
                                : (delta_y >= 0 ? down_modifier : up_modifier));
-         inev.ie.arg = list3 (Qnil, make_float (delta_x),
-                              make_float (-delta_y));
+         inev.ie.arg = list3 (Qnil, make_float (delta_x * 100),
+                              make_float (-delta_y * 100));
        }
       else
        {