DIRECTORY Rope USING [ROPE], GVBasics USING [RName]; SimpleMailer: CEDAR DEFINITIONS ~ BEGIN SendMessageInfo: TYPE = {ok, invalidRecipient, noValidRecipients, badPwd, badSender, badReturnTo, allDown}; ROPE: TYPE = Rope.ROPE; RName: TYPE = GVBasics.RName; SendMessage: PROC [from: ROPE _ NIL, returnTo: RName _ NIL, to, cc: LIST OF RName _ NIL, subject: ROPE _ NIL, otherHeader: ROPE _ NIL, body: ROPE _ NIL, validate: BOOL _ TRUE, sendIfValidateFails: BOOL _ FALSE] RETURNS [sent: BOOL, info: SendMessageInfo] END. DSimpleMailer.mesa Carl Hauser, August 4, 1986 3:39:42 pm PDT Ê ˜šœ™Icode™*—šÏk ˜ Kšœœœ˜Kšœ œ ˜K˜—K˜KšÏb œœ ˜Kšœ˜K˜KšœœV˜kK˜Kšœœœ˜šœœ˜K˜—š$Ïn œœœœœ œœ œ œœœœœœ œœœœ˜ÒJšœœ˜,—K˜šœ˜K˜——…— Y