From 0620697603bf6b593be416b349e24076f188cd82 Mon Sep 17 00:00:00 2001
From: slava <slava@factorcode.org>
Date: Sun, 15 Oct 2006 05:46:30 +0000
Subject: [PATCH] forget-rollover fix for Windows (and X11?)

---
 library/ui/gestures.factor | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/library/ui/gestures.factor b/library/ui/gestures.factor
index 44c8d96772..80e1afec87 100644
--- a/library/ui/gestures.factor
+++ b/library/ui/gestures.factor
@@ -108,8 +108,10 @@ SYMBOL: scroll-direction
     #! After we restore the UI, send mouse leave events to all
     #! gadgets that were under the mouse at the time of the
     #! save, since the mouse is in a different location now.
-    f hand-gadget [ get-global ] 2keep set-global
-    parents hand-gestures ;
+    f hand-world set-global
+    hand-gadget get-global >r
+    f hand-gadget set-global
+    f r> parents hand-gestures ;
 
 : focus-gestures ( new old -- )
     drop-prefix <reversed>
-- 
2.34.1