select-table-row ( n table -- )

Vocabulary

ui.gadgets.tables.private

Inputs

n	an object
table	an object

Outputs

None

Definition

USING: accessors kernel models ui.gadgets.tables ;

IN: ui.gadgets.tables.private

: select-table-row ( n table -- )
    [ selection-index>> set-model ]
    [ [ selected-row drop ] keep selection>> set-model ] bi ;