Fix walker

2009-03-16 20:49:09 -05:00 · 2009-03-16 20:49:09 -05:00 · ead3452957
parent 135f3bfc7f
commit ead3452957
1 changed files with 1 additions and 1 deletions
--- a/basis/ui/tools/walker/walker.factor
+++ b/basis/ui/tools/walker/walker.factor
@ -105,5 +105,5 @@ walker-gadget "multitouch" f {

 [
    dup find-walker-window dup
-    [ raise-window 3drop ] [ drop [ walker-window ] with-ui ] if
+    [ raise-window 3drop ] [ drop '[ _ _ _ walker-window ] with-ui ] if
 ] show-walker-hook set-global