core: Add the shuffler words but without primitives.

[factor.git] / basis / game / input / gtk / gtk.factor

diff --git a/basis/game/input/gtk/gtk.factor b/basis/game/input/gtk/gtk.factor
index 607c7d6ffce6761da42d3a7c2568d1700941fbda..8801610dddd9ecde5622016559f19f2d0e530479 100644 (file)
--- a/basis/game/input/gtk/gtk.factor
+++ b/basis/game/input/gtk/gtk.factor
@@ -98,7 +98,7 @@ M: gtk-game-input-backend read-keyboard
     get-dpy dup XDefaultRootWindow
     { int int int int int int int }
     [ XQueryPointer drop ] with-out-parameters
-    [ 4 ndrop ] 3dip ;
+    [ 4drop ] 3dip ;
 
 M: gtk-game-input-backend read-mouse
     query-pointer