Slightly changed CsvExport AppleScript sample