?gemini-url ( obj -- url )

Vocabulary

gemini.ui

Inputs

obj

an object

Outputs

url

an object

Definition

USING: kernel present sequences urls ;

IN: gemini.ui

: ?gemini-url ( obj -- url )
    present dup "://" subseq-of? [ "gemini://" prepend ] unless
    >url ;