wiki-url ( rest path -- url )

Vocabulary

webapps.wiki

Inputs

rest	an object
path	an object

Outputs

url

an object

Definition

USING: accessors kernel make present urls ;

IN: webapps.wiki

: wiki-url ( rest path -- url )
    [ "$wiki/" % % "/" % present % ] "" make <url> swap >>path ;