Re: Import Fix Script

[Paul Berkowitz]

Title: Re: Import Fix Script

On 12/27/00 6:20 PM, "Sue Freeman" <[EMAIL PROTECTED]> wrote:

> David Cortright wrote a script that I found in the archives to fix the
> unbold of imported messages.  I get a syntax error at the end try after
> delete I at the end of the script -- message is expected 'on' and found
> 'end'.  I'm hoping that I'm just missing some scripting addition bundle.
> Any help?


There's nothing wrong with it except hard-wrapped line ends from email (did you get this out of email?) or your having typed a return. I'm sending it back to you in HTML, after having fixed the hard-wrapping, so it won't hard-wrap again,

You should be able to copy and paste this into Script Editor ands compile OK.

-------------------
tell application "Microsoft Entourage"
    set s to the selection
    repeat with i in s
        if class of i is outgoing message then
            set s to source of i
            set sndr to sender of i
            set stor to storage of i
            set ts to time sent of i
            set tr to time received of i
            set c to category of i
            set prio to priority of i
            
            set nm to make new outgoing message with properties ¬
                {source:s, time sent:ts, time received:tr, read status:read} ¬
                    & {delivery status:sent, storage:stor, category:c, priority:prio}
            set sender of nm to sndr
            delete i
            try
                delete i
            end try
        end if
    end repeat
end tell

-------------------------------


--
Paul Berkowitz