connect ( pop3-account -- )
POP3 client library

Next:

<pop3-account> ( -- pop3-account )

Vocabulary
pop3

Inputs

pop3-account

a pop3-account

Outputs
None

Word description
Opens a network connection to the pop3 mail server with the settings given in the pop3-account slots.

Examples

USING: accessors pop3 ; <pop3-account> "pop.yourisp.com" >>host "[e-mail]" >>user "pass123" >>pwd connect

Definition

USING: accessors combinators io.encodings.utf8 io.sockets kernel
namespaces pop3.private ;

IN: pop3

: connect ( pop3-account -- )
    [ [ host>> ] [ port>> ] bi <inet> utf8 <client> drop ]
    1check >>stream {
        [ pop3-account set ]
        [ user>> [ >user ] when* ]
        [ pwd>> [ >pwd ] when* ]
    } cleave set-read-timeout get-ok ;