paste-url ( id -- url )

Vocabulary

webapps.pastebin

Inputs

id

an object

Outputs

url

an object

Definition

USING: kernel urls ;

IN: webapps.pastebin

: paste-url ( id -- url )
    "$pastebin/paste" >url swap "id" set-query-param ;