<downloads-action> ( -- action )

Vocabulary

webapps.mason.downloads

Inputs

None

Outputs

action

an object

Definition

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

IN: webapps.mason.downloads

: <downloads-action> ( -- action )
    <page-action> [
        [
            package-grid "package-grid" set-value
            release-grid "release-grid" set-value latest-version
            [ stable-release "stable-release" set-value ]
            [ source-release "source-release" set-value ] bi
        ] with-mason-db
    ] >>init ;