-- Outlook - Whitelist Recipients
-- https://c-command.com/scripts/spamsieve/outlook-whitelist-recipients
-- Summary: Adds the recipients of the current message to SpamSieve’s whitelist.
-- Requires: SpamSieve, Outlook
-- Install Location: ~/Documents/Microsoft User Data/Outlook Script Menu Items/
-- Last Modified: 2019-05-24



tell application "Microsoft Outlook"
	set _addresses to {}
	set _messages to current messages
	repeat with _message in _messages
		repeat with _recipient in recipients of _message
			set _emailAddress to email address of _recipient
			set _address to address of _emailAddress
			copy _address to end of _addresses
		end repeat
	end repeat
	
	tell application "SpamSieve"
		tell whitelist
			add sender rules for addresses _addresses
		end tell
	end tell
end tell