diff --git a/extra/demos/demos.factor b/extra/demos/demos.factor index c8e5a35f9e..40149bafa9 100644 --- a/extra/demos/demos.factor +++ b/extra/demos/demos.factor @@ -10,7 +10,7 @@ IN: demos : demo-vocabs ( -- seq ) "demos" tagged [ second ] map concat [ name>> ] map ; : ( vocab-name -- button ) - dup '[ drop [ , run ] call-listener ] ; + dup '[ drop [ , run ] call-listener ] { 0 0 } >>align ; : ( -- gadget ) 1 >>fill demo-vocabs [ add-gadget ] each ;