Updating code for make and fry changes

[factor.git] / extra / ui / gadgets / tiling / tiling.factor

diff --git a/extra/ui/gadgets/tiling/tiling.factor b/extra/ui/gadgets/tiling/tiling.factor
index 2d096966af5b642ced4913bbee667c60e79f815e..cf6ea7f48e6d6612c2d47482e6ee36dc9b6f89f2 100644 (file)
--- a/extra/ui/gadgets/tiling/tiling.factor
+++ b/extra/ui/gadgets/tiling/tiling.factor
@@ -1,7 +1,7 @@
 
 USING: kernel sequences math math.order
        ui.gadgets ui.gadgets.tracks ui.gestures
-       fry accessors ;
+       bake.fry accessors ;
 
 IN: ui.gadgets.tiling
 
@@ -93,7 +93,7 @@ TUPLE: tiling < track gadgets tiles first focused ;
 
 : exchanged! ( seq a b -- )
                    [ 0 max ] bi@
-  pick length 1 - '[ , min ] bi@
+  pick length 1 - '[ _ min ] bi@
   rot exchange ;
 
 : move-prev ( tiling -- tiling )