<compile-url-action> ( -- action )

Vocabulary

webapps.fjsc

Inputs

None

Outputs

action

an object

Definition

USING: accessors furnace.actions html.forms ;

IN: webapps.fjsc

: <compile-url-action> ( -- action )
    <action> [ validate-compile-url ] >>validate
    [ "url" value do-compile-url ] >>submit
    [ validate-compile-url "url" value do-compile-url ]
    >>display ;