equal
deleted
inserted
replaced
65 " |
65 " |
66 This is an application which presents a hierarchy of settings applications. |
66 This is an application which presents a hierarchy of settings applications. |
67 It is used (among others) in the launcher's and filebrowser's settings-dialogs. |
67 It is used (among others) in the launcher's and filebrowser's settings-dialogs. |
68 |
68 |
69 However, it is rather generic and can be setup for any application's setting dialog. |
69 However, it is rather generic and can be setup for any application's setting dialog. |
70 The actual contents (i.e. the arganization tree and tab contents) is provided |
70 The actual contents (i.e. the organization tree and tab contents) is provided |
71 by a spec-array (the settingsList). |
71 by a spec-array (the settingsList). |
72 You will find a default settings list here, but in theory, applications may provide |
72 You will find a default settings list here, but in theory, applications may provide |
73 their own one, or modify a copy of that list for specialized settings dialogs. |
73 their own one, or modify a copy of that list for specialized settings dialogs. |
74 See class >> examples, #defaultSettingsApplicationList |
74 See class >> examples, #defaultSettingsApplicationList |
75 and AbstractLauncherApplication >> settingsList for more info. |
75 and AbstractLauncherApplication >> settingsList for more info. |
1685 "/ to write the settings file |
1685 "/ to write the settings file |
1686 (self realApplications contains:[:app | app didModifySettings]) ifTrue:[ |
1686 (self realApplications contains:[:app | app didModifySettings]) ifTrue:[ |
1687 "D121136 - Filename doesnot understand allBold" |
1687 "D121136 - Filename doesnot understand allBold" |
1688 (Dialog |
1688 (Dialog |
1689 confirm:(resources |
1689 confirm:(resources |
1690 stringWithCRs:'Save your changed settings in the settings file?\(which is: "%1"\\If not saved, these changes only apply to your current session.' |
1690 stringWithCRs:'Save your changed settings in the settings file?\(which is: "%1")\\If not saved, these changes only apply to your current session.' |
1691 with:self class currentSettingsFilename asString allBold)) |
1691 with:self class currentSettingsFilename asString allBold)) |
1692 ifTrue:[ |
1692 ifTrue:[ |
1693 self saveSettingsWithoutAskingForFile. |
1693 self saveSettingsWithoutAskingForFile. |
1694 ]. |
1694 ]. |
1695 "D122540 - Dialog opens twice" |
1695 "D122540 - Dialog opens twice" |
1706 ! |
1706 ! |
1707 |
1707 |
1708 createRootItem |
1708 createRootItem |
1709 |rootItem lbl| |
1709 |rootItem lbl| |
1710 |
1710 |
1711 resources := AbstractLauncherApplication resources. |
1711 "/ this is stupidly wrong!! |
|
1712 "/ if the launcher thinks it needs this, it should set the resources |
|
1713 "/ (otherwise, reuse of resource dialog is difficult eg. in expecco) |
|
1714 "/ resources := AbstractLauncherApplication resources. |
1712 rootItem := self class itemClass new. |
1715 rootItem := self class itemClass new. |
1713 lbl := resources string:'Settings'. |
1716 lbl := resources string:'Settings'. |
1714 rootItem label:lbl "allBold". |
1717 rootItem label:lbl "allBold". |
1715 rootItem nameString:lbl. |
1718 rootItem nameString:lbl. |
1716 rootItem icon:self class settingsIcon. |
1719 rootItem icon:self class settingsIcon. |
1722 ! |
1725 ! |
1723 |
1726 |
1724 initialize |
1727 initialize |
1725 |rootItem| |
1728 |rootItem| |
1726 |
1729 |
|
1730 super initialize. |
1727 rootItem := self createRootItem. |
1731 rootItem := self createRootItem. |
1728 self applicationList root:rootItem; showRoot:true "false". |
1732 self applicationList root:rootItem; showRoot:true "false". |
1729 self selectedItem value:rootItem. |
1733 self selectedItem value:rootItem. |
1730 super initialize. |
|
1731 |
1734 |
1732 "Modified: / 03-11-2007 / 14:22:18 / cg" |
1735 "Modified: / 03-11-2007 / 14:22:18 / cg" |
1733 ! |
1736 ! |
1734 |
1737 |
1735 postBuildSubCanvas:aWidget |
1738 postBuildSubCanvas:aWidget |