already-logged-in ( username -- * )

Vocabulary
managed-server

Definition

IN: managed-server

TUPLE: already-logged-in { username read-only } ;

USING: kernel ;

IN: managed-server

: already-logged-in ( username -- * )
    \ already-logged-in boa throw ;