handle-login ( -- username )

Vocabulary

managed-server

Inputs

None

Outputs

username

an object

Definition

USING: io.servers ;

IN: managed-server

HOOK: handle-login threaded-server ( -- username )

Methods

USING: io managed-server managed-server.chat ;

M: chat-server handle-login "Username: " write flush readln ;