Last active

Move Message(s) to All Mail

  • Download Gist
1 2 3 4 5 6 7 8 9 10 11
tell application "Mail"
set theSelectedMessages to selection
set theMailbox to "[Gmail]/All Mail"
repeat with theMessage in theSelectedMessages
set messageAccount to account of mailbox of theMessage
tell application "Mail"
move the theMessage to mailbox theMailbox of messageAccount
end tell
end repeat
end tell

Please sign in to comment on this gist.

Something went wrong with that request. Please try again.