IN: ui.gadgets.scrollers

GENERIC: viewport-column-header ( gadget -- gadget/f )

USING: kernel ui.gadgets ui.gadgets.scrollers ;

M: gadget viewport-column-header drop f ;

USING: accessors kernel ui.gadgets.scrollers ui.gadgets.tables
ui.gadgets.tables.private ;

M: table viewport-column-header
dup renderer>> column-titles
[ <column-headers> ] [ drop f ] if ;