username-taken-string ( username -- string )

Vocabulary

managed-server.chat

Inputs

username

an object

Outputs

string

an object

Definition

USING: sequences ;

IN: managed-server.chat

: username-taken-string ( username -- string )
    "The username ``" "'' is already in use; try again."
    surround ;