Editing Incoming Messages in Mail
Editing Incoming Messages in Mail
- Subject: Editing Incoming Messages in Mail
- From: Christopher Stone <email@hidden>
- Date: Mon, 6 Jul 2009 02:34:49 -0500
Hey Folks,
One of several annoying things about Mail is the inability to edit incoming messages as you could in Eudora with the simple click of a button. It is possible to edit messages, but you have to move them to a drafts mailbox first and then open them manually. It would seem that you can't open the message with a script and have it remain editable. Strange.
Here's what I've come up with:
tell application "Mail"
try
set draftMail to a reference to mailbox "Drafts" of account 1 of application "Mail"
tell message viewer 1
if exists then
set selMsgs to selected messages
if length of selMsgs = 1 then
set msgID to message id of item 1 of selMsgs
move selMsgs to draftMail
set selected mailboxes to {draftMail}
delay 0.1
set selected messages to (get messages of draftMail whose message id is msgID)
end if
end if
end tell
on error errMsg number errNum
if errNum ≠ -2753 then
beep
display dialog errMsg & return & return & "Error Number: " & errNum
end if
end try
end tell -- And then manually hit 'Enter'.
If anyone has a better way I'd love to see it.
Thanks.
|
_______________________________________________
Do not post admin requests to the list. They will be ignored.
AppleScript-Users mailing list (email@hidden)
Help/Unsubscribe/Update your Subscription:
Archives: http://lists.apple.com/archives/applescript-users
This email sent to email@hidden