Help with script, please

In article <michelle-215C51.08350113062005.RemoveThis@news.west.cox.net>, Michelle
Steiner <michelle.RemoveThis@michelle.org> wrote:

> tell application "Mail"
...
> if not (mailbox folder_name exists) then
> make new mailbox at end of mailboxes with properties
> {name:folder_name}
> end if
> if not (exists (rule folder_name)) then
> set new_rule to make new rule at after rule 1 with properties
> {name:folder_name, move message:mailbox folder_name, stop evaluating
> rules:true}
> tell new_rule
> make new rule condition with properties {expression:address_,
> rule type:reply to, qualifier:does contain value, enabled:true}
> end tell
> end if
> end tell
>
> The problems are
> 1. It results in only the action to stop evaluating rules.
> 1a. If "stop evaluating rules:true" is removed from the script, the
> result is an action to move the message, but the mailbox is not
> specified. (This, BTW, is the default action, even if no actions are
> specified in the script.)
>
> 2. The rule type is "from" instead of "reply to"
> 3. The rule is not enabled.

Hi, Michelle. According to Mail 2.0.1's dictionary:

i) It's the rule that should have the 'enabled' property, not the rule
condition.
ii) Although 'reply to' compiles, it's not listed as one of the
possible rule types. 'From' is probably the closest alternative.
iii) The 'move message' thing seems to be enabled by setting the rule's
'should move message' to true.
iv) The rule apparently can't be enabled until the rule condition's in
place, so:

if not (exists (rule folder_name)) then
set new_rule to (make new rule at after rule 1 with properties
{name:folder_name, move message:mailbox folder_name, should move
message:true, stop evaluating rules:true})
tell new_rule
make new rule condition with properties {expression:address_,
rule type:from, qualifier:does contain value}
set enabled to true
end tell
end if

I'm not a Mail user myself, but I've tested this and it works in Tiger.

NG

--
To e-mail me, change '.invalid' to '.demon.co.uk'.