row-font ( row index table -- font )

Vocabulary

ui.gadgets.tables.private

Inputs

row	an object
index	an object
table	an object

Outputs

font

an object

Definition

USING: accessors kernel ui.gadgets.tables ;

IN: ui.gadgets.tables.private

:: row-font ( row index table -- font )
    table font>> clone row table renderer>> row-color
    [ >>foreground ] when*
    index table selection-index>> value>> =
    [ table selection-color>> >>background ] when ;