Re: Duplicated Message Content

Subject: Re: Duplicated Message Content
From: John <email@hidden>
Date: Sun, 17 Nov 2013 19:58:37 -0500

Hi Chris,

I am running Snow Leopard. Although the attached script didn't work for me, it pointed me in the right direction. Thank you! This seems to work...

tell application "Mail"

set aMessage to first item of (get selection)

set quote original message to false

set replyMessage to reply aMessage with opening window

set quote original message to true

tell replyMessage

set content to aMessage's content

end tell

On Sun, Nov 17, 2013 at 7:46 PM, Christopher Stone <email@hidden> wrote:

On Nov 16, 2013, at 15:57, John <email@hidden> wrote:

When I first started running the reply to script, a new message would appear with the content of the original message formatted properly. However when I run the script now, the reply message has the content of the original message duplicated eight times.

______________________________________________________________________

Hey John,

Which Mac OS are you using? This is a godawful bug that's been around since Leopard (?) and still isn't fixed in Mavericks.

All you have to do is start changing the recipient in the reply message, and things go completely south.

There is a work-around though.

--
Best Regards,

Chris

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

try

tell application "Mail"

set quoteOriginalMessagePref to quote original message

set selectedMsg to 1st item of (get selection)


set recipientList to {name, address} of recipients of selectedMsg

set newOutgoingMessage to reply selectedMsg with opening window


delay 0.05


if quoteOriginalMessagePref = true then set quote original message to false


tell newOutgoingMessage

set address of to recipients to ""

repeat with ndx from 1 to length of (item 1 of recipientList)

make new recipient at end of to recipients with properties ¬

{name:item ndx of item 1 of recipientList, address:item ndx of item 2 of recipientList}

end repeat
end tell

if quoteOriginalMessagePref then set quote original message to true


end tell


on error e

try
tell application "Mail"

set quote original message to true

end tell
end try
e

end try

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

_______________________________________________
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

 _______________________________________________
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

References:
	>Duplicated Message Content (From: John <email@hidden>)
	>Re: Duplicated Message Content (From: Christopher Stone <email@hidden>)

Prev by Date: Re: Duplicated Message Content
Next by Date: Re: Duplicated Message Content
Previous by thread: Re: Duplicated Message Content
Next by thread: Compiles But Doesn't Understand
Index(es):
- Date
- Thread