]> gitweb.factorcode.org Git - factor.git/commitdiff
ui.gadgets.worlds: use constraints for single gadget in window.
authorJohn Benediktsson <mrjbq7@gmail.com>
Fri, 19 Jan 2018 05:30:34 +0000 (21:30 -0800)
committerJohn Benediktsson <mrjbq7@gmail.com>
Fri, 19 Jan 2018 05:30:34 +0000 (21:30 -0800)
basis/ui/gadgets/worlds/worlds.factor

index 5da76510ce251e88bd59476fed465ab7b05099eb..b92d972a061b2f5243c2beed70053f0cb3399e70 100644 (file)
@@ -141,7 +141,7 @@ M: world apply-world-attributes
         [ window-controls>> >>window-controls ]
         [ initial-background-color >>background-color ]
         [ grab-input?>> >>grab-input? ]
-        [ gadgets>> dup sequence? [ [ f track-add ] each ] [ f track-add ] if ]
+        [ gadgets>> dup sequence? [ [ f track-add ] each ] [ 1 track-add ] if ]
         [ pref-dim>> >>pref-dim ]
         [ fill>> >>fill ]
         [ orientation>> >>orientation ]