crsrusl · August 3, 2017 12:01 · CaseyRo · Nov 18, 2020 · 22Nad · Apr 5, 2022
diff --git a/Things-Outlook.AppleScript b/Things-Outlook.AppleScript
 tell application "Microsoft Outlook"
 	set theMessage to first item of (get current messages)
 	set theSubject to the subject of theMessage
 	set theBody to the plain text content of theMessage
 	set theID to the id of theMessage
 end tell

 tell application "Things3"
 	show quick entry panel with properties {name:theSubject, notes:theBody}
 end tell
	tell application "Microsoft Outlook"
	set theMessage to first item of (get current messages)
	set theSubject to the subject of theMessage
	set theBody to the plain text content of theMessage
	set theID to the id of theMessage
	end tell

	tell application "Things3"
	show quick entry panel with properties {name:theSubject, notes:theBody}
	end tell