<pastebin-action> ( -- action )

Vocabulary

webapps.pastebin

Inputs

None

Outputs

action

an object

Definition

USING: accessors furnace.actions html.forms ;

IN: webapps.pastebin

: <pastebin-action> ( -- action )
    <page-action> [ pastes "pastes" set-value ] >>init
    { pastebin "pastebin" } >>template ;