Regenerated with OSA class inheritance and fix for non-ascii chars.

7 files changed, 103 insertions, 7 deletions

diff --git a/Mac/Lib/lib-scriptpackages/Explorer/Microsoft_Internet_Explorer.py b/Mac/Lib/lib-scriptpackages/Explorer/Microsoft_Internet_Explorer.py
index 167378e..ac8013d 100644
--- a/Mac/Lib/lib-scriptpackages/Explorer/Microsoft_Internet_Explorer.py
+++ b/Mac/Lib/lib-scriptpackages/Explorer/Microsoft_Internet_Explorer.py
@@ -1,7 +1,7 @@
 """Suite Microsoft Internet Explorer Suite: Events defined by Internet Explorer
 Level 1, version 1
 
-Generated from Moes:Applications (Mac OS 9):Internet Explorer 5:Internet Explorer
+Generated from /Volumes/Sap/Applications (Mac OS 9)/Internet Explorer 5/Internet Explorer
 AETE/AEUT resource version 1/0, language 0, script 0
 """
 
diff --git a/Mac/Lib/lib-scriptpackages/Explorer/Netscape_Suite.py b/Mac/Lib/lib-scriptpackages/Explorer/Netscape_Suite.py
index 588cd8f..5076ce4 100644
--- a/Mac/Lib/lib-scriptpackages/Explorer/Netscape_Suite.py
+++ b/Mac/Lib/lib-scriptpackages/Explorer/Netscape_Suite.py
@@ -1,7 +1,7 @@
 """Suite Netscape Suite: Events defined by Netscape
 Level 1, version 1
 
-Generated from Moes:Applications (Mac OS 9):Internet Explorer 5:Internet Explorer
+Generated from /Volumes/Sap/Applications (Mac OS 9)/Internet Explorer 5/Internet Explorer
 AETE/AEUT resource version 1/0, language 0, script 0
 """
 
diff --git a/Mac/Lib/lib-scriptpackages/Explorer/Required_Suite.py b/Mac/Lib/lib-scriptpackages/Explorer/Required_Suite.py
index 7497f37..05cfa19 100644
--- a/Mac/Lib/lib-scriptpackages/Explorer/Required_Suite.py
+++ b/Mac/Lib/lib-scriptpackages/Explorer/Required_Suite.py
@@ -1,7 +1,7 @@
 """Suite Required Suite: Events that every application should support
 Level 1, version 1
 
-Generated from Moes:Applications (Mac OS 9):Internet Explorer 5:Internet Explorer
+Generated from /Volumes/Sap/Applications (Mac OS 9)/Internet Explorer 5/Internet Explorer
 AETE/AEUT resource version 1/0, language 0, script 0
 """
 
@@ -52,7 +52,7 @@ class Required_Suite_Events(Required_Suite_Events):
 		if _arguments.has_key('----'):
 			return _arguments['----']
 
-	def _print(self, _object, _attributes={}, **_arguments):
+	def print_(self, _object, _attributes={}, **_arguments):
 		"""print: Print documents
 		Required argument: undocumented, typecode 'alis'
 		Keyword argument _attributes: AppleEvent attribute dictionary
diff --git a/Mac/Lib/lib-scriptpackages/Explorer/Standard_Suite.py b/Mac/Lib/lib-scriptpackages/Explorer/Standard_Suite.py
new file mode 100644
index 0000000..101afe7
--- /dev/null
+++ b/Mac/Lib/lib-scriptpackages/Explorer/Standard_Suite.py
@@ -0,0 +1,71 @@
+"""Suite Standard Suite: Common terms for most applications
+Level 1, version 1
+
+Generated from /Volumes/Sap/Applications (Mac OS 9)/Internet Explorer 5/Internet Explorer
+AETE/AEUT resource version 1/0, language 0, script 0
+"""
+
+import aetools
+import MacOS
+
+_code = '****'
+
+class Standard_Suite_Events:
+
+	_argmap_get = {
+		'as' : 'rtyp',
+	}
+
+	def get(self, _object, _attributes={}, **_arguments):
+		"""get: 
+		Required argument: an AE object reference
+		Keyword argument as: undocumented, typecode 'type'
+		Keyword argument _attributes: AppleEvent attribute dictionary
+		Returns: anything
+		"""
+		_code = 'core'
+		_subcode = 'getd'
+
+		aetools.keysubst(_arguments, self._argmap_get)
+		_arguments['----'] = _object
+
+
+		_reply, _arguments, _attributes = self.send(_code, _subcode,
+				_arguments, _attributes)
+		if _arguments.get('errn', 0):
+			raise aetools.Error, aetools.decodeerror(_arguments)
+		# XXXX Optionally decode result
+		if _arguments.has_key('----'):
+			return _arguments['----']
+
+
+class application(aetools.ComponentItem):
+	"""application - An application program """
+	want = 'capp'
+class selected_text(aetools.NProperty):
+	"""selected text - the selected text """
+	which = 'stxt'
+	want = 'TEXT'
+application._superclassnames = []
+application._privpropdict = {
+	'selected_text' : selected_text,
+}
+application._privelemdict = {
+}
+
+#
+# Indices of types declared in this module
+#
+_classdeclarations = {
+	'capp' : application,
+}
+
+_propdeclarations = {
+	'stxt' : selected_text,
+}
+
+_compdeclarations = {
+}
+
+_enumdeclarations = {
+}
diff --git a/Mac/Lib/lib-scriptpackages/Explorer/URL_Suite.py b/Mac/Lib/lib-scriptpackages/Explorer/URL_Suite.py
index 4f78802..a89913f 100644
--- a/Mac/Lib/lib-scriptpackages/Explorer/URL_Suite.py
+++ b/Mac/Lib/lib-scriptpackages/Explorer/URL_Suite.py
@@ -1,7 +1,7 @@
 """Suite URL Suite: Standard suite for Uniform Resource Locators
 Level 1, version 1
 
-Generated from Moes:Applications (Mac OS 9):Internet Explorer 5:Internet Explorer
+Generated from /Volumes/Sap/Applications (Mac OS 9)/Internet Explorer 5/Internet Explorer
 AETE/AEUT resource version 1/0, language 0, script 0
 """
 
diff --git a/Mac/Lib/lib-scriptpackages/Explorer/Web_Browser_Suite.py b/Mac/Lib/lib-scriptpackages/Explorer/Web_Browser_Suite.py
index b95083d..96f4ec0 100644
--- a/Mac/Lib/lib-scriptpackages/Explorer/Web_Browser_Suite.py
+++ b/Mac/Lib/lib-scriptpackages/Explorer/Web_Browser_Suite.py
@@ -1,7 +1,7 @@
 """Suite Web Browser Suite: Class of events supported by Web Browser applications
 Level 1, version 1
 
-Generated from Moes:Applications (Mac OS 9):Internet Explorer 5:Internet Explorer
+Generated from /Volumes/Sap/Applications (Mac OS 9)/Internet Explorer 5/Internet Explorer
 AETE/AEUT resource version 1/0, language 0, script 0
 """
 
diff --git a/Mac/Lib/lib-scriptpackages/Explorer/__init__.py b/Mac/Lib/lib-scriptpackages/Explorer/__init__.py
index fd917cc..15e8b21 100644
--- a/Mac/Lib/lib-scriptpackages/Explorer/__init__.py
+++ b/Mac/Lib/lib-scriptpackages/Explorer/__init__.py
@@ -1,5 +1,5 @@
 """
-Package generated from Moes:Applications (Mac OS 9):Internet Explorer 5:Internet Explorer
+Package generated from /Volumes/Sap/Applications (Mac OS 9)/Internet Explorer 5/Internet Explorer
 Resource aete resid 0 
 """
 import aetools
@@ -38,6 +38,29 @@ from Web_Browser_Suite import *
 from URL_Suite import *
 from Microsoft_Internet_Explorer import *
 from Netscape_Suite import *
+def getbaseclasses(v):
+	if hasattr(v, '_superclassnames') and not hasattr(v, '_propdict'):
+		v._propdict = {}
+		v._elemdict = {}
+		for superclass in v._superclassnames:
+			v._propdict.update(getattr(eval(superclass), '_privpropdict', {}))
+			v._elemdict.update(getattr(eval(superclass), '_privelemdict', {}))
+		v._propdict.update(v._privpropdict)
+		v._elemdict.update(v._privelemdict)
+
+import StdSuites
+
+#
+# Set property and element dictionaries now that all classes have been defined
+#
+getbaseclasses(application)
+
+#
+# Indices of types declared in this module
+#
+_classdeclarations = {
+	'capp' : application,
+}
 
 
 class Explorer(Required_Suite_Events,
@@ -49,3 +72,5 @@ class Explorer(Required_Suite_Events,
 		aetools.TalkTo):
 	_signature = 'MSIE'
 
+	_moduleName = 'Explorer'
+