diff --git a/extra/ui/gadgets/slots/slots.factor b/extra/ui/gadgets/slots/slots.factor index cd339d7ff7..2ce4a1fa8c 100755 --- a/extra/ui/gadgets/slots/slots.factor +++ b/extra/ui/gadgets/slots/slots.factor @@ -109,7 +109,7 @@ TUPLE: editable-slot < track printer ref ; [ clear-track ] [ dup ref>> - [ swap 1 track-add ] + [ 1 track-add* drop ] [ [ scroll>gadget ] [ request-focus ] bi* ] 2bi ] bi ;