layout-thumb ( slider -- )

Vocabulary

ui.gadgets.sliders.private

Inputs

slider

an object

Outputs

None

Definition

USING: accessors kernel ;

IN: ui.gadgets.sliders.private

: layout-thumb ( slider -- )
    [ thumb>> ] keep
    [ slider-enabled? >>visible? drop ] [ layout-thumb-loc ]
    [ layout-thumb-dim ] 2tri ;