Gabriel unlocked2412
unlocked2412
/ OmniFocus Selected Mail Messages.applescript
Last active
August 31, 2017 23:25
— forked from rentzsch/OmniFocus Selected Mail Messages.applescript
OmniFocus Selected Mail Messages.applescript
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| tell application "Mail" | |
| set lst to (get selection) | |
| set _msgRecent to my GetNewerMessage(lst) | |
| repeat with _msg in _msgRecent | |
| set _msgSubject to _msg's subject | |
| set _msgBody to _msg's content | |
| set _msgSender to _msg's sender | |
| set _msgURL to "message://%3c" & _msg's message id & "%3e" -- Fixed: OmniFocus doesn't accept "<" and ">" as part of a URL | |
| tell application "OmniFocus" | |
| tell quick entry |