pekr wrote:
> Now look:
> -------------
>
> header: make system/standard/email [
> from: [EMAIL PROTECTED]
> to: [EMAIL PROTECTED]
> Date: to-idate now
> Subject: "So this is subject ...."
> Body: "And this should be one and only body"
> ]
But there is no body in the email header! See:
>> probe system/standard/email
make object! [
To: none
CC: none
BCC: none
From: none
Reply-To: none
Date: none
Subject: none
Return-Path: none
Organization: none
Message-Id: none
Comment: none
X-REBOL: {2.2.0.3.1 "The Internet Messaging Language (TM)
WWW.REBOL.COM"}
MIME-Version: none
Content-Type: none
Content: none
]
So this:
send/header [EMAIL PROTECTED] {My Message is here!} header
is done correctly by REBOL. The 'subject from the 'header is used.
> send/header header-obj should be the syntax - specify everything
inside the object... But well, I am not sure REBOL is capable of
missing some arguments to functions...
Better is:
Mail!: make system/standard/email [
Body: string!
Send: func ["sends mail as appropriate"] [; blah blah blah]
]
My_Mail: make Mail! [
From: [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Date: to-idate now
Subject: "So this is subject ...."
Body: "And this should be one and only body"
]
My_Mail/Send
What do you think?
This enhancement to 'send:
send Email-Address My-Message /subject "My subject line is this!"
would be reasonably easy to do, I believe.
Any one want to do either of these two in the next day or two and send
it in to this list?
Andrew Martin
Object oriented...
[EMAIL PROTECTED]
http://members.xoom.com/AndrewMartin/
Online @ 33,600 Baud!
-><-