1--------------------------------------------------------------------------------- 2-- Name: docs/mac/SetXMLCreator.applescript 3-- Purpose: Sets the creator types of the XML files 4-- Author: Ryan Wilcox 5-- Modified by: 6-- Created: 2004-03-30 7-- RCS-ID: $Id: SetXMLCreator.applescript 26486 2004-03-30 10:26:17Z JS $ 8-- Copyright: (c) 2004 Ryan Wilcox 9-- Licence: wxWindows licence 10-- 11-- Press the run button and select the file you need (or, alternatively, save the 12-- script as an application drag-and-drop the files on top of it). 13--------------------------------------------------------------------------------- 14 15on run 16 set myFile to choose file 17 open ({myFile}) 18end run 19 20 21on open (fileList) 22 23 repeat with each in fileList 24 25 tell application "Finder" 26 if name of each contains "M5" or name of each contains "M7" or name of each contains "M8" then 27 set creator type of each to "CWIE" 28 set file type of each to "TEXT" 29 30 log "set" 31 end if 32 33 end tell 34 end repeat 35end open 36 37