filter CodeWarrior data directories during recursive directory scan

git-svn-id: https://svn.wxwidgets.org/svn/wx/wxWidgets/trunk@12831 c3d73ce0-8a6f-49c7-b76d-6d57e0e08775

diff --git a/docs/mac/M5build.applescript b/docs/mac/M5build.applescript
index 8b951bc547c1491b5a50fffa255054a0e12b3510..0bd059210626d5a63bc14b0562fe54b2ccc620a7 100644 (file)
--- 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 6902cfb38327547ae05a30ee4ead2306d9669a3a..9a7179c4f58a83c36566fcf7f06a27b0215e886e 100644 (file)
--- 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 9d993d6e747a5a86e35b21fd9f06f6f750a9ebcd..d1eb0e3a1fe238299c764183a30d0d70bf9e43dc 100644 (file)
--- 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