(handle-disconnect) ( -- )

Vocabulary

irc.client.internals

Inputs

None

Outputs

None

Definition

USING: accessors concurrency.mailboxes irc.client.base
irc.client.chats ;

IN: irc.client.internals

: (handle-disconnect) ( -- )
    irc-disconnected irc> in-messages>> mailbox-put
    (connect-irc) (do-login) ;