SimpleMailer.mesa
Copyright Ó 1992 by Xerox Corporation. All rights reserved.
Carl Hauser, August 4, 1986 3:39:42 pm PDT
Doug Terry, July 18, 1990 3:44:38 pm PDT
DIRECTORY
Rope USING [ROPE],
MailBasics USING [RName],
MailSend USING [SendingCredentialsList];
SimpleMailer: CEDAR DEFINITIONS
~ BEGIN
ROPE: TYPE = Rope.ROPE;
RName:
TYPE = MailBasics.RName;
SendMessage:
PROC [from:
ROPE ¬
NIL, to, cc:
LIST
OF RName ¬
NIL, subject:
ROPE ¬
NIL, otherHeader:
ROPE ¬
NIL, body:
ROPE ¬
NIL, validate:
BOOL ¬
TRUE, sendIfValidateFails:
BOOL ¬
FALSE, credentials: MailSend.SendingCredentialsList ¬
NIL]
RETURNS [sent: BOOL, failureReason: ROPE];