Applescript to delete old email in folders