More style issues

[wxWidgets.git] / docs / mac / M5xml2mcp.applescript

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