Package with suites for talking to netscape.

Mac/Lib/lib-scriptpackages/Netscape/PowerPlant.py

@@ -0,0 +1,86 @@
+"""Suite PowerPlant: 
+Level 0, version 0
+
+Generated from Macintosh HD:Internet:Internet-programma's:Netscape Communicator<6F>-map:Netscape Communicator<6F>
+AETE/AEUT resource version 1/0, language 0, script 0
+"""
+
+import aetools
+import MacOS
+
+_code = 'ppnt'
+
+class PowerPlant_Events:
+
+	_argmap_select = {
+		'data' : 'data',
+	}
+
+	def select(self, _object, _attributes={}, **_arguments):
+		"""select: Sets the present selection
+		Required argument: object to select or container of sub-objects to select
+		Keyword argument data: sub-object(s) to select
+		Keyword argument _attributes: AppleEvent attribute dictionary
+		"""
+		_code = 'misc'
+		_subcode = 'slct'
+
+		aetools.keysubst(_arguments, self._argmap_select)
+		_arguments['----'] = _object
+
+
+		_reply, _arguments, _attributes = self.send(_code, _subcode,
+				_arguments, _attributes)
+		if _arguments.has_key('errn'):
+			raise aetools.Error, aetools.decodeerror(_arguments)
+		# XXXX Optionally decode result
+		if _arguments.has_key('----'):
+			return _arguments['----']
+
+	_argmap_SwitchTellTarget = {
+		'to' : 'data',
+	}
+
+	def SwitchTellTarget(self, _no_object=None, _attributes={}, **_arguments):
+		"""SwitchTellTarget: Makes an object the ³focus² of AppleEvents
+		Keyword argument to: reference to new focus of AppleEvents
+		Keyword argument _attributes: AppleEvent attribute dictionary
+		"""
+		_code = 'ppnt'
+		_subcode = 'sttg'
+
+		aetools.keysubst(_arguments, self._argmap_SwitchTellTarget)
+		if _no_object != None: raise TypeError, 'No direct arg expected'
+
+
+		_reply, _arguments, _attributes = self.send(_code, _subcode,
+				_arguments, _attributes)
+		if _arguments.has_key('errn'):
+			raise aetools.Error, aetools.decodeerror(_arguments)
+		# XXXX Optionally decode result
+		if _arguments.has_key('----'):
+			return _arguments['----']
+
+_Enum_dbac = {
+	'DoNothing' : '\000\000\000\000',	# No debugging action is taken.
+	'PostAlert' : '\000\000\000\001',	# Post an alert.
+	'LowLevelDebugger' : '\000\000\000\002',	# Break into the low level debugger (MacsBug).
+	'SourceDebugger' : '\000\000\000\003',	# Break into the source level debugger (if source debugger is executing).
+}
+
+
+#
+# Indices of types declared in this module
+#
+_classdeclarations = {
+}
+
+_propdeclarations = {
+}
+
+_compdeclarations = {
+}
+
+_enumdeclarations = {
+	'dbac' : _Enum_dbac,
+}