Mail.appで選択したメールのMailTagsによるキーワードとプロジェクトを取得するAppleScript

gistfile1.applescript

tell application "Mail"
	set selectedMails to the selection
	using terms from application "MailTagsHelper"
		set keyword to keywords of item 1 of selectedMails
		set myproject to project of item 1 of selectedMails
	end using terms from
	
	display dialog keyword
	display dialog myproject
end tell