<remove-watched-site-action> ( -- action )

Vocabulary

webapps.site-watcher.watching

Inputs

None

Outputs

action

an object

Definition

USING: accessors furnace.actions furnace.auth
furnace.redirection html.forms site-watcher.db validators ;

IN: webapps.site-watcher.watching

: <remove-watched-site-action> ( -- action )
    <action>
    [ { { "url" [ v-url ] } } validate-params ] >>validate [
        username "url" value unwatch-site
        site-list-url <redirect>
    ] >>submit <protected> "remove a watched site" >>description
    ;