view-post-url ( id -- url )

Vocabulary

webapps.blogs

Inputs

id

an object

Outputs

url

an object

Definition

USING: present sequences urls ;

IN: webapps.blogs

: view-post-url ( id -- url )
    present "$blogs/post/" prepend >url ;