select-capabilities ( seq -- )

Vocabulary

webapps.user-admin

Inputs

seq

an object

Outputs

None

Definition

USING: furnace.utilities html.forms kernel sequences ;

IN: webapps.user-admin

: select-capabilities ( seq -- )
    [ t swap word>string set-value ] each ;