write-header ( key value -- )

Vocabulary

smtp.private

Inputs

key	an object
value	an object

Outputs

None

Definition

USING: io io.crlf kernel ;

IN: smtp.private

: write-header ( key value -- )
    [ validate-header write ]
    [ ": " write validate-header encode-header write ] bi* crlf
    ;