From ed62334d9589ffb3d71cb1d0d874dab77094f433 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Philipp=20Br=C3=BCschweiler?= Date: Sun, 18 Jul 2010 16:18:27 +0200 Subject: [PATCH] game.input.gtk: clean up confusing reset-mouse/read-mouse interaction --- basis/game/input/gtk/gtk.factor | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) diff --git a/basis/game/input/gtk/gtk.factor b/basis/game/input/gtk/gtk.factor index 9eac60022a..57db116c97 100644 --- a/basis/game/input/gtk/gtk.factor +++ b/basis/game/input/gtk/gtk.factor @@ -16,7 +16,7 @@ FUNCTION: Display* gdk_x11_display_get_xdisplay ( GdkDisplay* display ) ; gdk_display_get_default gdk_x11_display_get_xdisplay ; M: gtk-game-input-backend (open-game-input) - ; + reset-mouse ; M: gtk-game-input-backend (close-game-input) ; @@ -98,10 +98,7 @@ M: gtk-game-input-backend read-keyboard [ XQueryPointer drop ] with-out-parameters [ 4 ndrop ] 3dip ; -SYMBOL: mouse-reset? - M: gtk-game-input-backend read-mouse - mouse-reset? get [ reset-mouse ] unless query-pointer mouse-state new swap 256 /i >>buttons @@ -111,4 +108,4 @@ M: gtk-game-input-backend read-mouse M: gtk-game-input-backend reset-mouse get-dpy dup XDefaultRootWindow dup - 0 0 0 0 400 400 XWarpPointer drop t mouse-reset? set-global ; + 0 0 0 0 400 400 XWarpPointer drop ;