add hg and python

1 files changed, 54 insertions, 0 deletions

diff --git a/sys/lib/python/plat-mac/lib-scriptpackages/Explorer/URL_Suite.py b/sys/lib/python/plat-mac/lib-scriptpackages/Explorer/URL_Suite.py
new file mode 100644
index 000000000..e234546ce
--- /dev/null
+++ b/sys/lib/python/plat-mac/lib-scriptpackages/Explorer/URL_Suite.py
@@ -0,0 +1,54 @@
+"""Suite URL Suite: Standard suite for Uniform Resource Locators
+Level 1, version 1
+
+Generated from /Applications/Internet Explorer.app
+AETE/AEUT resource version 1/0, language 0, script 0
+"""
+
+import aetools
+import MacOS
+
+_code = 'GURL'
+
+class URL_Suite_Events:
+
+    _argmap_GetURL = {
+        'to' : 'dest',
+    }
+
+    def GetURL(self, _object, _attributes={}, **_arguments):
+        """GetURL: Open the URL (and optionally save it to disk)
+        Required argument: URL to open
+        Keyword argument to: File into which to save resource located at URL.
+        Keyword argument _attributes: AppleEvent attribute dictionary
+        """
+        _code = 'GURL'
+        _subcode = 'GURL'
+
+        aetools.keysubst(_arguments, self._argmap_GetURL)
+        _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['----']
+
+
+#
+# Indices of types declared in this module
+#
+_classdeclarations = {
+}
+
+_propdeclarations = {
+}
+
+_compdeclarations = {
+}
+
+_enumdeclarations = {
+}