Rebol Programming/resend

= USAGE: = RESEND to from message

= DESCRIPTION: = Relay a message

RESEND is a function value. = ARGUMENTS =
 * to -- (Type: any)
 * from -- (Type: any)
 * message -- (Type: any)

= SOURCE CODE = resend: func [ "Relay a message" to from message /local smtp-port ][   smtp-port: open [scheme: 'esmtp] insert smtp-port reduce [from reduce [to] message] close smtp-port ]