mx-line. ( host pair -- )

Vocabulary

tools.dns

Inputs

host	an object
pair	an object

Outputs

None

Definition

USING: io kernel math.parser sequences ;

IN: tools.dns

: mx-line. ( host pair -- )
    dup length 1 =
    [ [ write " is an alias for " write ] [ first print ] bi* ] 
    [
        [ write " mail is handled by " write ]
        [ first2 [ number>string write bl ] [ print ] bi* ] bi*
    ] if ;