diff --git a/docs/mac/M5build.applescript b/docs/mac/M5build.applescript index 8b951bc547..0bd0592106 100644 --- a/docs/mac/M5build.applescript +++ b/docs/mac/M5build.applescript @@ -156,7 +156,7 @@ on BuildProjects(inLogFileRef, inFolder, inTarget, inRebuild) write gSeparator to inLogFileRef end if - tell application "Finder" to set theSubFolders to every folder of inFolder + tell application "Finder" to set theSubFolders to every folder of inFolder whose name does not end with " Data" repeat with theFolder in theSubFolders BuildProjects(inLogFileRef, theFolder, inTarget, inRebuild) end repeat diff --git a/docs/mac/M5mcp2xml.applescript b/docs/mac/M5mcp2xml.applescript index 6902cfb383..9a7179c4f5 100644 --- a/docs/mac/M5mcp2xml.applescript +++ b/docs/mac/M5mcp2xml.applescript @@ -40,6 +40,8 @@ tell me to display dialog "Exported " & theProjectSuccessCount & " projects out on ExportProjects(inFolder) global theProjectCount, theProjectSuccessCount + tell application "Finder" to update inFolder + try tell application "Finder" to set theProject to ((the first file of inFolder whose name ends with gProjectSuffix) as string) on error @@ -82,7 +84,7 @@ on ExportProjects(inFolder) end tell end if - tell application "Finder" to set theSubFolders to every folder of inFolder + tell application "Finder" to set theSubFolders to every folder of inFolder whose name does not end with " Data" repeat with theFolder in theSubFolders ExportProjects(theFolder) end repeat diff --git a/docs/mac/M5xml2mcp.applescript b/docs/mac/M5xml2mcp.applescript index 9d993d6e74..d1eb0e3a1f 100644 --- a/docs/mac/M5xml2mcp.applescript +++ b/docs/mac/M5xml2mcp.applescript @@ -40,6 +40,8 @@ tell me to display dialog "Imported " & theXmlSuccessCount & " xml files out of on ImportProjects(inFolder) global theXmlCount, theXmlSuccessCount + tell application "Finder" to update inFolder + try tell application "Finder" to set theXml to ((the first file of inFolder whose name ends with gXmlSuffix) as string) on error @@ -78,7 +80,7 @@ on ImportProjects(inFolder) end tell end if - tell application "Finder" to set theSubFolders to every folder of inFolder + tell application "Finder" to set theSubFolders to every folder of inFolder whose name does not end with " Data" repeat with theFolder in theSubFolders ImportProjects(theFolder) end repeat