From 8bd7c56459ea9ada6ae0fe177fb471341cfe6416 Mon Sep 17 00:00:00 2001
From: Jack Jansen <jack.jansen@cwi.nl>
Date: Mon, 23 Dec 1996 16:54:51 +0000
Subject: If sys.argv is empty ask for input file and output folder

---
 Mac/scripts/unshar.py | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)

diff --git a/Mac/scripts/unshar.py b/Mac/scripts/unshar.py
index fa60e5a..a90ee34 100644
--- a/Mac/scripts/unshar.py
+++ b/Mac/scripts/unshar.py
@@ -69,3 +69,29 @@ def unshar(fp, verbose=0, overwrite=0):
 			file = None
 			continue
 		if verbose: print "...", `line`
+		
+def main():
+	import sys
+	import os
+	if len(sys.argv) > 1:
+		for fname in sys.argv[1:]:
+			fp = open(fname, 'r')
+			dir, fn = os.path.split(fname)
+			if dir:
+				os.chdir(dir)
+			unshar(fp)
+	else:
+		import macfs
+		fss, ok = macfs.StandardGetFile('TEXT')
+		if not ok:
+			sys.exit(0)
+		fname = fss.as_pathname()
+		fp = open(fname, 'r')
+		fss, ok = macfs.GetDirectory('Folder to save files in:')
+		if not ok:
+			sys.exit(0)
+		os.chdir(fss.as_pathname())
+		unshar(fp)
+		
+if __name__ == '__main__':
+	main()
-- 
cgit v0.12