Mercurial > cpython-lru_cache-weakref
annotate Mac/scripts/EditPythonPrefs.py @ 12593:eaee924efb19 legacy-trunk
Removed string-exception preference, added tabcheck and NavService preference, upped version number.
| author | Jack Jansen <jack.jansen@cwi.nl> |
|---|---|
| date | Fri, 05 May 2000 23:11:14 +0000 |
| parents | 99c9b126690d |
| children | a6c8413b3c4f |
| rev | line source |
|---|---|
|
2873
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
1 """Edit the Python Preferences file.""" |
|
3504
e8d501c88a3e
Added region arg to update calls. And binhex files rebinhexed.
Jack Jansen <jack.jansen@cwi.nl>
parents:
3484
diff
changeset
|
2 # |
|
e8d501c88a3e
Added region arg to update calls. And binhex files rebinhexed.
Jack Jansen <jack.jansen@cwi.nl>
parents:
3484
diff
changeset
|
3 # This program is getting more and more clunky. It should really |
|
e8d501c88a3e
Added region arg to update calls. And binhex files rebinhexed.
Jack Jansen <jack.jansen@cwi.nl>
parents:
3484
diff
changeset
|
4 # be rewritten in a modeless way some time soon. |
|
2873
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
5 |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
6 from Dlg import * |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
7 from Events import * |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
8 from Res import * |
|
11624
3c213e372b22
Partially converted to Appearance, the dialog still has the old ugly layout and
Jack Jansen <jack.jansen@cwi.nl>
parents:
11517
diff
changeset
|
9 import Controls |
|
2873
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
10 import string |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
11 import struct |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
12 import macfs |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
13 import MacOS |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
14 import os |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
15 import sys |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
16 import Res # For Res.Error |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
17 import pythonprefs |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
18 import EasyDialogs |
|
6298
ebd099889721
Implemented balloon help for EditPythonPrefs
Jack Jansen <jack.jansen@cwi.nl>
parents:
6275
diff
changeset
|
19 import Help |
|
4448
85d38456adf0
Get preference file name from a resource.
Jack Jansen <jack.jansen@cwi.nl>
parents:
4398
diff
changeset
|
20 |
|
2873
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
21 # resource IDs in our own resources (dialogs, etc) |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
22 MESSAGE_ID = 256 |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
23 |
|
4398
ec4c42bea69d
Moved resources to 510/511: the numbers above 512 gave problems when
Jack Jansen <jack.jansen@cwi.nl>
parents:
4235
diff
changeset
|
24 DIALOG_ID = 511 |
|
2873
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
25 TEXT_ITEM = 1 |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
26 OK_ITEM = 2 |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
27 CANCEL_ITEM = 3 |
|
3484
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
28 DIR_ITEM = 4 |
|
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
29 TITLE_ITEM = 5 |
|
3504
e8d501c88a3e
Added region arg to update calls. And binhex files rebinhexed.
Jack Jansen <jack.jansen@cwi.nl>
parents:
3484
diff
changeset
|
30 OPTIONS_ITEM = 7 |
|
6298
ebd099889721
Implemented balloon help for EditPythonPrefs
Jack Jansen <jack.jansen@cwi.nl>
parents:
6275
diff
changeset
|
31 HELP_ITEM = 9 |
|
3504
e8d501c88a3e
Added region arg to update calls. And binhex files rebinhexed.
Jack Jansen <jack.jansen@cwi.nl>
parents:
3484
diff
changeset
|
32 |
|
e8d501c88a3e
Added region arg to update calls. And binhex files rebinhexed.
Jack Jansen <jack.jansen@cwi.nl>
parents:
3484
diff
changeset
|
33 # The options dialog. There is a correspondence between |
|
e8d501c88a3e
Added region arg to update calls. And binhex files rebinhexed.
Jack Jansen <jack.jansen@cwi.nl>
parents:
3484
diff
changeset
|
34 # the dialog item numbers and the option. |
|
4398
ec4c42bea69d
Moved resources to 510/511: the numbers above 512 gave problems when
Jack Jansen <jack.jansen@cwi.nl>
parents:
4235
diff
changeset
|
35 OPT_DIALOG_ID = 510 |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
36 |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
37 # Map dialog item numbers to option names (and the reverse) |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
38 opt_dialog_map = [ |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
39 None, |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
40 "inspect", |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
41 "verbose", |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
42 "optimize", |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
43 "unbuffered", |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
44 "debugging", |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
45 "keepopen", |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
46 "keeperror", |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
47 "nointopt", |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
48 "noargs", |
|
6298
ebd099889721
Implemented balloon help for EditPythonPrefs
Jack Jansen <jack.jansen@cwi.nl>
parents:
6275
diff
changeset
|
49 "delayconsole", |
|
ebd099889721
Implemented balloon help for EditPythonPrefs
Jack Jansen <jack.jansen@cwi.nl>
parents:
6275
diff
changeset
|
50 None, None, None, None, None, None, None, None, # 11-18 are different |
|
12593
eaee924efb19
Removed string-exception preference, added tabcheck and NavService preference, upped version number.
Jack Jansen <jack.jansen@cwi.nl>
parents:
11652
diff
changeset
|
51 "tabwarn", |
|
eaee924efb19
Removed string-exception preference, added tabcheck and NavService preference, upped version number.
Jack Jansen <jack.jansen@cwi.nl>
parents:
11652
diff
changeset
|
52 "nosite", |
|
eaee924efb19
Removed string-exception preference, added tabcheck and NavService preference, upped version number.
Jack Jansen <jack.jansen@cwi.nl>
parents:
11652
diff
changeset
|
53 None, |
|
eaee924efb19
Removed string-exception preference, added tabcheck and NavService preference, upped version number.
Jack Jansen <jack.jansen@cwi.nl>
parents:
11652
diff
changeset
|
54 "nonavservices"] |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
55 opt_dialog_dict = {} |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
56 for i in range(len(opt_dialog_map)): |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
57 if opt_dialog_map[i]: |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
58 opt_dialog_dict[opt_dialog_map[i]] = i |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
59 # 1 thru 10 are the options |
|
4230
41a52ab263da
Allow editing selected bits of the GUSI preferences (creator, type and
Jack Jansen <jack.jansen@cwi.nl>
parents:
3504
diff
changeset
|
60 # The GUSI creator/type and delay-console |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
61 OD_CREATOR_ITEM = 11 |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
62 OD_TYPE_ITEM = 12 |
|
4230
41a52ab263da
Allow editing selected bits of the GUSI preferences (creator, type and
Jack Jansen <jack.jansen@cwi.nl>
parents:
3504
diff
changeset
|
63 OD_OK_ITEM = 13 |
|
41a52ab263da
Allow editing selected bits of the GUSI preferences (creator, type and
Jack Jansen <jack.jansen@cwi.nl>
parents:
3504
diff
changeset
|
64 OD_CANCEL_ITEM = 14 |
|
6298
ebd099889721
Implemented balloon help for EditPythonPrefs
Jack Jansen <jack.jansen@cwi.nl>
parents:
6275
diff
changeset
|
65 OD_HELP_ITEM = 22 |
|
2873
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
66 |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
67 def optinteract(options): |
|
3504
e8d501c88a3e
Added region arg to update calls. And binhex files rebinhexed.
Jack Jansen <jack.jansen@cwi.nl>
parents:
3484
diff
changeset
|
68 """Let the user interact with the options dialog""" |
|
e8d501c88a3e
Added region arg to update calls. And binhex files rebinhexed.
Jack Jansen <jack.jansen@cwi.nl>
parents:
3484
diff
changeset
|
69 d = GetNewDialog(OPT_DIALOG_ID, -1) |
|
11624
3c213e372b22
Partially converted to Appearance, the dialog still has the old ugly layout and
Jack Jansen <jack.jansen@cwi.nl>
parents:
11517
diff
changeset
|
70 htext = d.GetDialogItemAsControl(OD_CREATOR_ITEM) |
|
3c213e372b22
Partially converted to Appearance, the dialog still has the old ugly layout and
Jack Jansen <jack.jansen@cwi.nl>
parents:
11517
diff
changeset
|
71 SetDialogItemText(htext, options['creator']) |
|
3c213e372b22
Partially converted to Appearance, the dialog still has the old ugly layout and
Jack Jansen <jack.jansen@cwi.nl>
parents:
11517
diff
changeset
|
72 htext = d.GetDialogItemAsControl(OD_TYPE_ITEM) |
|
3c213e372b22
Partially converted to Appearance, the dialog still has the old ugly layout and
Jack Jansen <jack.jansen@cwi.nl>
parents:
11517
diff
changeset
|
73 SetDialogItemText(htext, options['type']) |
|
3504
e8d501c88a3e
Added region arg to update calls. And binhex files rebinhexed.
Jack Jansen <jack.jansen@cwi.nl>
parents:
3484
diff
changeset
|
74 d.SetDialogDefaultItem(OD_OK_ITEM) |
|
e8d501c88a3e
Added region arg to update calls. And binhex files rebinhexed.
Jack Jansen <jack.jansen@cwi.nl>
parents:
3484
diff
changeset
|
75 d.SetDialogCancelItem(OD_CANCEL_ITEM) |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
76 |
|
3504
e8d501c88a3e
Added region arg to update calls. And binhex files rebinhexed.
Jack Jansen <jack.jansen@cwi.nl>
parents:
3484
diff
changeset
|
77 while 1: |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
78 for name in opt_dialog_dict.keys(): |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
79 num = opt_dialog_dict[name] |
|
11624
3c213e372b22
Partially converted to Appearance, the dialog still has the old ugly layout and
Jack Jansen <jack.jansen@cwi.nl>
parents:
11517
diff
changeset
|
80 ctl = d.GetDialogItemAsControl(num) |
|
3c213e372b22
Partially converted to Appearance, the dialog still has the old ugly layout and
Jack Jansen <jack.jansen@cwi.nl>
parents:
11517
diff
changeset
|
81 ctl.SetControlValue(options[name]) |
|
3504
e8d501c88a3e
Added region arg to update calls. And binhex files rebinhexed.
Jack Jansen <jack.jansen@cwi.nl>
parents:
3484
diff
changeset
|
82 n = ModalDialog(None) |
|
e8d501c88a3e
Added region arg to update calls. And binhex files rebinhexed.
Jack Jansen <jack.jansen@cwi.nl>
parents:
3484
diff
changeset
|
83 if n == OD_OK_ITEM: |
|
11624
3c213e372b22
Partially converted to Appearance, the dialog still has the old ugly layout and
Jack Jansen <jack.jansen@cwi.nl>
parents:
11517
diff
changeset
|
84 htext = d.GetDialogItemAsControl(OD_CREATOR_ITEM) |
|
3c213e372b22
Partially converted to Appearance, the dialog still has the old ugly layout and
Jack Jansen <jack.jansen@cwi.nl>
parents:
11517
diff
changeset
|
85 ncreator = GetDialogItemText(htext) |
|
3c213e372b22
Partially converted to Appearance, the dialog still has the old ugly layout and
Jack Jansen <jack.jansen@cwi.nl>
parents:
11517
diff
changeset
|
86 htext = d.GetDialogItemAsControl(OD_TYPE_ITEM) |
|
3c213e372b22
Partially converted to Appearance, the dialog still has the old ugly layout and
Jack Jansen <jack.jansen@cwi.nl>
parents:
11517
diff
changeset
|
87 ntype = GetDialogItemText(htext) |
|
4230
41a52ab263da
Allow editing selected bits of the GUSI preferences (creator, type and
Jack Jansen <jack.jansen@cwi.nl>
parents:
3504
diff
changeset
|
88 if len(ncreator) == 4 and len(ntype) == 4: |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
89 options['creator'] = ncreator |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
90 options['type'] = ntype |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
91 return options |
|
4230
41a52ab263da
Allow editing selected bits of the GUSI preferences (creator, type and
Jack Jansen <jack.jansen@cwi.nl>
parents:
3504
diff
changeset
|
92 else: |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
93 MacOS.SysBeep() |
|
3504
e8d501c88a3e
Added region arg to update calls. And binhex files rebinhexed.
Jack Jansen <jack.jansen@cwi.nl>
parents:
3484
diff
changeset
|
94 elif n == OD_CANCEL_ITEM: |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
95 return |
|
4230
41a52ab263da
Allow editing selected bits of the GUSI preferences (creator, type and
Jack Jansen <jack.jansen@cwi.nl>
parents:
3504
diff
changeset
|
96 elif n in (OD_CREATOR_ITEM, OD_TYPE_ITEM): |
|
41a52ab263da
Allow editing selected bits of the GUSI preferences (creator, type and
Jack Jansen <jack.jansen@cwi.nl>
parents:
3504
diff
changeset
|
97 pass |
|
6298
ebd099889721
Implemented balloon help for EditPythonPrefs
Jack Jansen <jack.jansen@cwi.nl>
parents:
6275
diff
changeset
|
98 elif n == OD_HELP_ITEM: |
|
ebd099889721
Implemented balloon help for EditPythonPrefs
Jack Jansen <jack.jansen@cwi.nl>
parents:
6275
diff
changeset
|
99 onoff = Help.HMGetBalloons() |
|
ebd099889721
Implemented balloon help for EditPythonPrefs
Jack Jansen <jack.jansen@cwi.nl>
parents:
6275
diff
changeset
|
100 Help.HMSetBalloons(not onoff) |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
101 elif 1 <= n <= len(opt_dialog_map): |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
102 options[opt_dialog_map[n]] = (not options[opt_dialog_map[n]]) |
|
3504
e8d501c88a3e
Added region arg to update calls. And binhex files rebinhexed.
Jack Jansen <jack.jansen@cwi.nl>
parents:
3484
diff
changeset
|
103 |
|
e8d501c88a3e
Added region arg to update calls. And binhex files rebinhexed.
Jack Jansen <jack.jansen@cwi.nl>
parents:
3484
diff
changeset
|
104 |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
105 def interact(options, title): |
|
2873
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
106 """Let the user interact with the dialog""" |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
107 try: |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
108 # Try to go to the "correct" dir for GetDirectory |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
109 os.chdir(options['dir'].as_pathname()) |
|
2873
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
110 except os.error: |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
111 pass |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
112 d = GetNewDialog(DIALOG_ID, -1) |
|
11624
3c213e372b22
Partially converted to Appearance, the dialog still has the old ugly layout and
Jack Jansen <jack.jansen@cwi.nl>
parents:
11517
diff
changeset
|
113 htext = d.GetDialogItemAsControl(TITLE_ITEM) |
|
3c213e372b22
Partially converted to Appearance, the dialog still has the old ugly layout and
Jack Jansen <jack.jansen@cwi.nl>
parents:
11517
diff
changeset
|
114 SetDialogItemText(htext, title) |
|
11652
99c9b126690d
Get/set sys.path initializer in new appearance way.
Jack Jansen <jack.jansen@cwi.nl>
parents:
11624
diff
changeset
|
115 path_ctl = d.GetDialogItemAsControl(TEXT_ITEM) |
|
11624
3c213e372b22
Partially converted to Appearance, the dialog still has the old ugly layout and
Jack Jansen <jack.jansen@cwi.nl>
parents:
11517
diff
changeset
|
116 data = string.joinfields(options['path'], '\r') |
|
11652
99c9b126690d
Get/set sys.path initializer in new appearance way.
Jack Jansen <jack.jansen@cwi.nl>
parents:
11624
diff
changeset
|
117 path_ctl.SetControlData(Controls.kControlEditTextPart, Controls.kControlEditTextTextTag, data) |
|
11624
3c213e372b22
Partially converted to Appearance, the dialog still has the old ugly layout and
Jack Jansen <jack.jansen@cwi.nl>
parents:
11517
diff
changeset
|
118 |
|
4550
f1244036ebab
Fixed to allow sys.path initializer to be longer than 255 chars.
Jack Jansen <jack.jansen@cwi.nl>
parents:
4448
diff
changeset
|
119 d.SelectDialogItemText(TEXT_ITEM, 0, 32767) |
|
f1244036ebab
Fixed to allow sys.path initializer to be longer than 255 chars.
Jack Jansen <jack.jansen@cwi.nl>
parents:
4448
diff
changeset
|
120 d.SelectDialogItemText(TEXT_ITEM, 0, 0) |
|
3484
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
121 ## d.SetDialogDefaultItem(OK_ITEM) |
|
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
122 d.SetDialogCancelItem(CANCEL_ITEM) |
|
4550
f1244036ebab
Fixed to allow sys.path initializer to be longer than 255 chars.
Jack Jansen <jack.jansen@cwi.nl>
parents:
4448
diff
changeset
|
123 d.GetDialogWindow().ShowWindow() |
|
f1244036ebab
Fixed to allow sys.path initializer to be longer than 255 chars.
Jack Jansen <jack.jansen@cwi.nl>
parents:
4448
diff
changeset
|
124 d.DrawDialog() |
|
2873
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
125 while 1: |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
126 n = ModalDialog(None) |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
127 if n == OK_ITEM: |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
128 break |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
129 if n == CANCEL_ITEM: |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
130 return None |
|
3484
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
131 ## if n == REVERT_ITEM: |
|
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
132 ## return [], pythondir |
|
2873
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
133 if n == DIR_ITEM: |
|
2979
7eea9b426802
Added prompts to various file-select dialogs
Jack Jansen <jack.jansen@cwi.nl>
parents:
2873
diff
changeset
|
134 fss, ok = macfs.GetDirectory('Select python home folder:') |
|
2873
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
135 if ok: |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
136 options['dir'] = fss |
|
6298
ebd099889721
Implemented balloon help for EditPythonPrefs
Jack Jansen <jack.jansen@cwi.nl>
parents:
6275
diff
changeset
|
137 elif n == HELP_ITEM: |
|
ebd099889721
Implemented balloon help for EditPythonPrefs
Jack Jansen <jack.jansen@cwi.nl>
parents:
6275
diff
changeset
|
138 onoff = Help.HMGetBalloons() |
|
ebd099889721
Implemented balloon help for EditPythonPrefs
Jack Jansen <jack.jansen@cwi.nl>
parents:
6275
diff
changeset
|
139 Help.HMSetBalloons(not onoff) |
|
3504
e8d501c88a3e
Added region arg to update calls. And binhex files rebinhexed.
Jack Jansen <jack.jansen@cwi.nl>
parents:
3484
diff
changeset
|
140 if n == OPTIONS_ITEM: |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
141 noptions = options |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
142 for k in options.keys(): |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
143 noptions[k] = options[k] |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
144 noptions = optinteract(noptions) |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
145 if noptions: |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
146 options = noptions |
|
11652
99c9b126690d
Get/set sys.path initializer in new appearance way.
Jack Jansen <jack.jansen@cwi.nl>
parents:
11624
diff
changeset
|
147 data = path_ctl.GetControlData(Controls.kControlEditTextPart, Controls.kControlEditTextTextTag) |
|
99c9b126690d
Get/set sys.path initializer in new appearance way.
Jack Jansen <jack.jansen@cwi.nl>
parents:
11624
diff
changeset
|
148 tmp = string.splitfields(data, '\r') |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
149 newpath = [] |
|
2873
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
150 for i in tmp: |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
151 if i: |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
152 newpath.append(i) |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
153 options['path'] = newpath |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
154 return options |
|
2873
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
155 |
|
3484
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
156 |
|
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
157 def edit_preferences(): |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
158 handler = pythonprefs.PythonOptions() |
|
11517
71281ff8c6a2
Give a warning if system-wide sys.argv processing is off (because then we
Jack Jansen <jack.jansen@cwi.nl>
parents:
6298
diff
changeset
|
159 options = handler.load() |
|
71281ff8c6a2
Give a warning if system-wide sys.argv processing is off (because then we
Jack Jansen <jack.jansen@cwi.nl>
parents:
6298
diff
changeset
|
160 if options['noargs']: |
|
71281ff8c6a2
Give a warning if system-wide sys.argv processing is off (because then we
Jack Jansen <jack.jansen@cwi.nl>
parents:
6298
diff
changeset
|
161 EasyDialogs.Message('Warning: system-wide sys.argv processing is off.\nIf you dropped an applet I have not seen it.') |
|
71281ff8c6a2
Give a warning if system-wide sys.argv processing is off (because then we
Jack Jansen <jack.jansen@cwi.nl>
parents:
6298
diff
changeset
|
162 result = interact(options, 'System-wide preferences') |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
163 if result: |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
164 handler.save(result) |
|
3484
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
165 |
|
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
166 def edit_applet(name): |
|
6275
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
167 handler = pythonprefs.AppletOptions(name) |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
168 result = interact(handler.load(), os.path.split(name)[1]) |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
169 if result: |
|
f9fbde75c536
Major overhaul: this is now little more than a user interface, the
Jack Jansen <jack.jansen@cwi.nl>
parents:
6174
diff
changeset
|
170 handler.save(result) |
|
3484
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
171 |
|
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
172 def main(): |
|
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
173 try: |
|
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
174 h = OpenResFile('EditPythonPrefs.rsrc') |
|
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
175 except Res.Error: |
|
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
176 pass # Assume we already have acces to our own resource |
|
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
177 |
|
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
178 if len(sys.argv) <= 1: |
|
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
179 edit_preferences() |
|
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
180 else: |
|
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
181 for appl in sys.argv[1:]: |
|
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
182 edit_applet(appl) |
|
ce27e0328462
Added support for editing override preferences in applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
3462
diff
changeset
|
183 |
|
2873
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
184 |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
185 if __name__ == '__main__': |
|
315760ba0041
A new home for scripts/applets
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff
changeset
|
186 main() |
