store-labelled-button ( button -- str/f )

Vocabulary

ui.tools.button-list

Inputs

button

an object

Outputs

str/f

an object

Definition

USING: assocs kernel ;

IN: ui.tools.button-list

: store-labelled-button ( button -- str/f )
    dup label-from-button
    [ [ world-buttons set-at ] keep ] [ drop f ] if* ;