PowerMail - Whitelist Recipients

Summary: Adds the recipients of the current message to SpamSieve’s whitelist.
Requires: SpamSieve, PowerMail
Install Location: PowerMail Files/Custom Scripts
Last Modified: 2010-11-27

Description

Create an outgoing filter in PowerMail that applies to all messages and runs this AppleScript. Then, whenever you send a message, SpamSieve will add its recipients to the whitelist.

Installation Instructions · Download in Compiled Format · Download in Text Format

Script

tell application "PowerMail"
    
set theAddresses to {}
    
set msgs to current messages
    
repeat with m in msgs
        
repeat with r in m's recipients
            
set a to r's address
            
set e to a's email address
            
copy e to end of theAddresses
        
end repeat
    
end repeat
    
    
tell application "SpamSieve"
        
tell whitelist
            
add sender rules for addresses theAddresses
        
end tell
    
end tell
end tell