AuroraMiddleware/wxWidgets
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

filter CodeWarrior data directories during recursive directory scan

Browse Source 
git-svn-id: https://svn.wxwidgets.org/svn/wx/wxWidgets/trunk@12831 c3d73ce0-8a6f-49c7-b76d-6d57e0e08775
This commit is contained in:
Gilles Depeyrot 2001-12-02 20:02:17 +00:00
parent b383b2c1fd
commit 8a242615ef
3 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
docs/mac/M5build.applescript
View File

@ -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

4
docs/mac/M5mcp2xml.applescript
View File

@ -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

4
docs/mac/M5xml2mcp.applescript
View File

@ -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