add-thumb-to-elevator ( object -- object )

Vocabulary

ui.gadgets.sliders.private

Inputs

object

an object

Outputs

object

an object

Definition

USING: accessors kernel ui.gadgets ;

IN: ui.gadgets.sliders.private

: add-thumb-to-elevator ( object -- object )
    [ elevator>> ] [ thumb>> ] bi add-gadget ;