Object <- MailFormatter <- MagicCapMailFormatter |
|
|
DoneWithMailElements FormatFormIdentifier FormatMailElement FormatPart StartMessageFormatting |
Class MagicCapMailFormatter defines no new attributes.
Fields
instance MagicCapMailFormatter tag; telecardToFormat: nilObject; formToFormat: nilObject; destination: nilObject; additionalParts: nilObject; partEncoders: nilObject; preflighting: false; attachmentsToSend: nilObject; extras: nilObject; end instance;
Define Class MagicCapMailFormatter; inherits from MailFormatter; field attachmentsToSend: ObjectList; // a list of objects accumulated by calls to FormatMailElement field extras: MagicCapMailExtras; // the container for Magic Cap content lacking a natural MIME representation overrides FormatFormIdentifier; // if the form isn't "well-known", adds it to the extras object to be sent overrides FormatMailElement; // adds the element to attachmentsToSend overrides StartMessageFormatting; // resets attachmentsToSend and extras overrides DoneWithMailElements; // processes the elements in attachmentsToSend, generating either MIME parts // to be formatted or objects to be sent along the with extras container overrides FormatPart; // creates a stream and encoder for the part and calls EncodePart end class;