Can I suggest this change to be included in the Synapse source code:

procedure TMessHeader.EncodeHeaders(const Value: TStrings);
...
 for n := 0 to FCCList.Count - 1 do
   if s = '' then
     s := InlineEmailEx(FCCList[n], FCharsetCode)
   else
//    s := s + ' , ' + InlineEmailEx(FCCList[n], FCharsetCode);
     s := s + ', ' + InlineEmailEx(FCCList[n], FCharsetCode);

 for n := 0 to FToList.Count - 1 do
   if s = '' then
     s := InlineEmailEx(FToList[n], FCharsetCode)
   else
//      s := s + ' , ' + InlineEmailEx(FToList[n], FCharsetCode);
     s := s + ', ' + InlineEmailEx(FToList[n], FCharsetCode);

Note - current code contains a space before the comma: ' , '


function InlineEmailEx(const Value: string; FromCP: TMimeChar): string;
var
 sd, se: string;
begin
 sd := GetEmailDesc(Value);
 se := GetEmailAddr(Value);
 if sd = '' then
   Result := se
 else
//    Result := '"' + InlineCodeEx(sd, FromCP) + '" <' + se + '>';
   Result := '"' + InlineCodeEx(sd, FromCP) + '"<' + se + '>';
end;

Note current code is missing a space between " and <

In the existing code, multiple emails are formatted as:

"My Email"<[EMAIL PROTECTED]> , "Some one else"<[EMAIL PROTECTED]> , "Another person"<[EMAIL PROTECTED]>

I believe this looks more readable:
"My Email" <[EMAIL PROTECTED]>, "Some one else" <[EMAIL PROTECTED]>, "Another person" <[EMAIL PROTECTED]>

Is there a reason for the existing formatting? If not, can it be changed?


Regards,
Pawel Rewak
Practical Programs
BEGIN:VCARD
VERSION:2.1
N:Rewak;Pawel
FN:Pawel Rewak
ORG:Practical Programs
ADR;WORK:;;7 Tucker Street;Adelaide;SA;5000;South Australia
LABEL;WORK;ENCODING=QUOTED-PRINTABLE:7 Tucker Street=0D=0AAdelaide, SA 5000=0D=0ASouth Australia
URL;WORK:http://www.practicalprograms.com
EMAIL;PREF;INTERNET:[EMAIL PROTECTED]
REV:20061213T000526Z
END:VCARD
-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys - and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
_______________________________________________
synalist-public mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/synalist-public

Reply via email to