(DTPtechNote:1696) mailの転送が10.5で駄目になりました

[ダン <anonymous at unknown-host>]

はじめまして。
10.4では動作していましたAppleScript が10.5で動作しなくなりました。原因が全く分かりません。
もしよろしければご教示いただければ助かります。
PCに新着メールがくると件名のみ携帯に転送するAppleScript です。（本文も転送するのはルールでできるのですが、仕事柄添付ファイルが多いため出来ません）
AppleScript は下記の通りです。

on perform_mail_action(info)
	tell application "Mail"
		set getNewMails to |SelectedMessages| of info
		repeat with eachNewMail in getNewMails
			(* set fromSender to sender of eachNewMail *)
			set fromsubject to subject of eachNewMail
			set newMessage to make new outgoing message with properties {subject:fromsubject, content:"" & return & return}
			tell newMessage
				(* set visible to true
				set sender to fromSender *)
				make new to recipient at end of to recipients with properties {name:"", address:"**********@docomo.ne.jp"}
				send
			end tell
			(* activate *)
			(* send *)
		end repeat
	end tell
end perform_mail_action