url-of ( object -- url ) (original) (raw)

url-of ( object -- url )

Vocabulary
html.streams

Inputs

object an object

Outputs

url a string

Generic word contract
Outputs a link to a page displaying a presentation of the given object. This word is called when write-object is called on html-writer instances.

Definition

IN: html.streams

GENERIC: url-of ( object -- url )

Methods

USING: html.streams kernel ;

M: object url-of drop f ;

USING: accessors html.streams io.pathnames kernel sequences
splitting ;

M: pathname url-of
string>> "resource:" ?head
[ "https://github.com/factor/factor/blob/master/" prepend ]
[ drop f ] if ;

USING: help.html help.topics html.streams ;

M: topic url-of topic>filename ;