short-host-name ( -- string )

Vocabulary

mason.common

Inputs

None

Outputs

string

an object

Definition

USING: io.sockets kernel splitting ;

IN: mason.common

: short-host-name ( -- string )
    host-name "." split1 drop [ no-host-name ] unless* ;