list-value ( list -- object )
List gadgets
Prev:<list> ( hook presenter model -- gadget )


Vocabulary
ui.gadgets.lists

Inputs
lista list


Outputs
objectan object


Word description
Outputs the currently selected list value.

Definition
USING: accessors kernel sequences ui.gadgets ;

IN: ui.gadgets.lists

: list-value ( list -- object )
dup index>> swap control-value ?nth ;