label-on-left/right ( -- track )

Vocabulary

ui.gadgets.labels.private

Inputs

None

Outputs

track

an object

Definition

USING: accessors ui.baseline-alignment ui.gadgets
ui.gadgets.tracks ;

IN: ui.gadgets.labels.private

: label-on-left/right ( -- track )
    horizontal <track> 0 >>fill +baseline+ >>align { 5 5 } >>gap
    ; inline