master 09c28ca: Fix sign of pixel scroll events on Haiku

[Po Lu]

branch: master
commit 09c28ca073e3d4fb68fb7685d6e6ce6dd521fd0e
Author: Po Lu <luangruo@yahoo.com>
Commit: Po Lu <luangruo@yahoo.com>

    Fix sign of pixel scroll events on Haiku
    
    * src/haikuterm.c (haiku_read_socket): Fix sign of scroll
    events.
---
 src/haikuterm.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/haikuterm.c b/src/haikuterm.c
index 97dbe3c..6bf4589 100644
--- a/src/haikuterm.c
+++ b/src/haikuterm.c
@@ -3033,8 +3033,8 @@ haiku_read_socket (struct terminal *terminal, struct 
input_event *hold_quit)
 
                XSETINT (inev.x, x);
                XSETINT (inev.y, y);
-               inev.arg = list3 (Qnil, make_float (px),
-                                 make_float (py));
+               inev.arg = list3 (Qnil, make_float (-px),
+                                 make_float (-py));
                XSETFRAME (inev.frame_or_window, f);
 
                inev.modifiers |= (signbit (inev.kind == HORIZ_WHEEL_EVENT