gopher-link - Factor Documentation

Vocabulary
gopher .private

Definition

IN: gopher.private

TUPLE: gopher-link type name selector host port ;

Methods

USING: accessors combinators formatting gopher.private kernel
splitting urls ;

M: gopher-link >url
dup type>> 104 =
[ selector>> "URL:" ?head drop ] [
{ [ host>> ] [ port>> ] [ type>> ] [ selector>> ] }
cleave "gopher://%s:%s/%c%s" sprintf
] if >url ;

USING: gopher.private present summary urls ;

M: gopher-link summary >url present ;