core: Rename iota to <iota> so we can have TUPLE: iota ... ; instead of TUPLE: iota...

[factor.git] / extra / game / input / demos / joysticks / joysticks.factor

diff --git a/extra/game/input/demos/joysticks/joysticks.factor b/extra/game/input/demos/joysticks/joysticks.factor
index a6992c25667734f0b289d7f7c49edf4ba4c8f268..fdf910dfae8fc4d660f9d655b2474c60a78abd4c 100644 (file)
--- a/extra/game/input/demos/joysticks/joysticks.factor
+++ b/extra/game/input/demos/joysticks/joysticks.factor
@@ -88,7 +88,7 @@ TUPLE: joystick-demo-gadget < pack axis raxis controller buttons timer ;
     <axis-gadget> [ >>raxis ] [ add-gadget-with-border ] bi-curry bi* ;
 
 :: (add-button-gadgets) ( gadget shelf -- )
-    gadget controller>> read-controller buttons>> length iota [
+    gadget controller>> read-controller buttons>> length <iota> [
         number>string [ drop ] <border-button>
         shelf over add-gadget drop
     ] map gadget buttons<< ;