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

[Po Lu]

branch: master
commit 3dbe7caed744fe95b855d56bc2f8ebe97788133c
Author: Po Lu <luangruo@yahoo.com>
Commit: Po Lu <luangruo@yahoo.com>

    * src/pgtkterm.c (scroll_event): Fix scroll delta scale.
---
 src/pgtkterm.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/pgtkterm.c b/src/pgtkterm.c
index 74ecde0..74a71b9 100644
--- 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
        {