Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[REBOL] Re: initializing system/standard/email

From: gabriele:colellachiara at: 4-Sep-2006 10:46

Hi Tim, On Sunday, September 3, 2006, 6:07:04 PM, you wrote:
>> I still don't see the bug and I've studied this code >> before.
TJ> 1)'send needs the 'address and 'message arguments TJ> 2)with the /header refinement, a header-obj of type TJ> object! is also required TJ> The problem occurs when the /header refinement is used TJ> and the 'to member of the header object is *also* used TJ> as the 'address argument, Exactly, but not only that - you don't want what you gave as header/to cleared in any case. The fix is: either header-obj/to [ header-obj/to: copy header-obj/to ] [ header-obj/to: tmp: make string! 20 if show [ foreach email address [repend tmp [email ", "]] clear back back tail tmp ] ] or, to avoid copying when not necessary, the copy could be done in the "not only" case. Regards, Gabriele. -- Gabriele Santilli <> --- Colella Chiara software division ---