Applescript alterations