thread-status

Vocabulary

ui.tools.walker

Definition

USING: ui.gadgets.labels ;

IN: ui.tools.walker

TUPLE: thread-status < label ;

Methods

USING: accessors combinators kernel models ui.pens.solid
ui.tools.walker ;

M: thread-status model-changed
    [ value>> ] dip {
        [ [ thread-status-text ] [ string<< ] bi* ]
        [
            [ thread-status-foreground ] [ font>> foreground<< ]
            bi*
        ]
        [
            [ thread-status-background <solid> ]
            [ parent>> parent>> interior<< ] bi*
        ]
    } 2cleave ;