[Oberon] Re (2): Duplicate headers in SMTP.

[Paul Reed]

Hi Peter,

On 2022-07-22 22:46, peter at easthope.ca wrote:
...
> To: ...... at gmail.com
> To: s.... at shaw.ca
...

"Oh, it's worse than that, Jim!" :)

The code

    ...
    Recipient(i, t, rcpt);
    WHILE rcpt # "" DO
      Texts.Append(head, W.buf);
      Texts.WriteString(W, "To: "); Texts.WriteString(W, rcpt);
      Texts.WriteLn(W); Texts.Append(Oberon.Log, W.buf);
      SendCmd(S, "RCPT TO:", rcpt); ReadResponse(S);
      IF S.reply[0] # "2" THEN
        S.res := NetTools.Failed; RETURN FALSE
      END;
      Recipient(i, t, rcpt); first := FALSE
    END;
    ...

will need a good coat of looking at, to reduce the number of "TO:" 
headers to one. :(

Cheers,
Paul