ui: fixing stack effect on slurp-vector

diff --git a/basis/ui/ui.factor b/basis/ui/ui.factor
index 222e79a6079ce8917609d4e3204c0b6ad8c3b457..378e46907eb0c278fbb1b754e865620f111c8a91 100644 (file)
--- a/basis/ui/ui.factor
+++ b/basis/ui/ui.factor
@@ -111,7 +111,7 @@ M: world ungraft*
     dup hand-world get-global eq?
     [ hand-loc get-global swap move-hand ] [ drop ] if ;
 
-: slurp-vector ( .. seq quot: ( ... elt -- .. ) -- )
+: slurp-vector ( ... seq quot: ( ... elt -- ... ) -- ... )
     over '[ _ empty? not ] -rot '[ _ pop @ ] while ; inline
 
 : layout-queued ( -- seq )