<concatenative-website> ( -- responder )

Vocabulary

websites.concatenative

Inputs

None

Outputs

responder

an object

Definition

USING: accessors furnace.redirection http.server.dispatchers
http.server.static urls ;

IN: websites.concatenative

: <concatenative-website> ( -- responder )
    concatenative-website new-dispatcher
    "resource:extra/websites/concatenative" <static> >>default
    URL" /wiki/view/Front%20Page" <redirect-responder> ""
    add-responder ;