From: Jack Jansen <jack.jansen@cwi.nl>
Date: Wed, 21 Feb 1996 15:27:24 +0000 (+0000)
Subject: Script to recursively change PYTH creators to Pyth
X-Git-Tag: v1.4b1~335
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=22586993c5471e6ed09a7a34807acf33dee59ebf;p=python

Script to recursively change PYTH creators to Pyth
---

diff --git a/Mac/scripts/FixCreator.py b/Mac/scripts/FixCreator.py
new file mode 100644
index 0000000000..f5213d072e
--- /dev/null
+++ b/Mac/scripts/FixCreator.py
@@ -0,0 +1,34 @@
+#
+# FixCreator - Search for files with PYTH creator
+# and set it to Pyth.
+#
+import os
+import macfs
+import sys
+
+OLD='PYTH'
+NEW='Pyth'
+
+def walktree(name, change):
+	if os.path.isfile(name):
+		fs = macfs.FSSpec(name)
+		cur_cr, cur_tp = fs.GetCreatorType()
+		if cur_cr == OLD:
+			fs.SetCreatorType(NEW, cur_tp)
+			print 'Fixed ', name
+	elif os.path.isdir(name):
+		print '->', name
+		files = os.listdir(name)
+		for f in files:
+			walktree(os.path.join(name, f), change)
+			
+def run(change):
+	fss, ok = macfs.GetDirectory('Folder to search:')
+	if not ok:
+		sys.exit(0)
+	walktree(fss.as_pathname(), change)
+	
+if __name__ == '__main__':
+	run(1)
+	
+