<dashboard-action> ( -- action )

Vocabulary

webapps.mason.downloads

Inputs

None

Outputs

action

an object

Definition

USING: accessors furnace.actions html.forms kernel
webapps.mason.backend ;

IN: webapps.mason.downloads

: <dashboard-action> ( -- action )
    <page-action> [
        [
            all-builders
            [ machine-list "machines" set-value ]
            [ builder-list "builders" set-value ] bi
        ] with-mason-db
    ] >>init ;