1"""Suite Standard URL suite: Mac URL standard, supported by many apps
2
3
4Level 1, version 1
5
6Generated from /Volumes/Sap/Applications (Mac OS 9)/Netscape Communicator\xe2\x84\xa2 Folder/Netscape Communicator\xe2\x84\xa2
7AETE/AEUT resource version 1/0, language 0, script 0
8"""
9
10import aetools
11import MacOS
12
13_code = 'GURL'
14
15class Standard_URL_suite_Events:
16
17    _argmap_GetURL = {
18        'to' : 'dest',
19        'inside' : 'HWIN',
20        'from_' : 'refe',
21    }
22
23    def GetURL(self, _object, _attributes={}, **_arguments):
24        """GetURL: Loads the URL (optionally to disk)
25        Required argument: The url
26        Keyword argument to: file the URL should be loaded into
27        Keyword argument inside: Window the URL should be loaded to
28        Keyword argument from_: Referrer, to be sent with the HTTP request
29        Keyword argument _attributes: AppleEvent attribute dictionary
30        """
31        _code = 'GURL'
32        _subcode = 'GURL'
33
34        aetools.keysubst(_arguments, self._argmap_GetURL)
35        _arguments['----'] = _object
36
37
38        _reply, _arguments, _attributes = self.send(_code, _subcode,
39                _arguments, _attributes)
40        if _arguments.get('errn', 0):
41            raise aetools.Error, aetools.decodeerror(_arguments)
42        # XXXX Optionally decode result
43        if _arguments.has_key('----'):
44            return _arguments['----']
45
46
47#
48# Indices of types declared in this module
49#
50_classdeclarations = {
51}
52
53_propdeclarations = {
54}
55
56_compdeclarations = {
57}
58
59_enumdeclarations = {
60}
61