*** empty log message ***
authorca
Fri, 30 Jan 2004 00:48:56 +0100
changeset 5465 2c1dc7101e03
parent 5464 4f59a3bc9fb2
child 5466 6156bad27291
*** empty log message ***
AbstractLauncherApplication.st
SettingsDialog.st
--- a/AbstractLauncherApplication.st	Fri Jan 30 00:36:28 2004 +0100
+++ b/AbstractLauncherApplication.st	Fri Jan 30 00:48:56 2004 +0100
@@ -4065,7 +4065,7 @@
 !
 
 saveSettings
-    SettingsDialog saveSettingsWithoutAskForFile.
+    SettingsDialog saveSettingsWithoutAskingForFile.
 !
 
 sourceAndDebuggerSettings
@@ -6416,5 +6416,5 @@
 !AbstractLauncherApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.300 2004-01-29 23:36:17 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.301 2004-01-29 23:48:56 ca Exp $'
 ! !
--- a/SettingsDialog.st	Fri Jan 30 00:36:28 2004 +0100
+++ b/SettingsDialog.st	Fri Jan 30 00:48:56 2004 +0100
@@ -240,14 +240,14 @@
                                 #label: 'Save'
                                 #name: 'Button3'
                                 #translateLabel: true
-                                #model: #saveSettingsWithoutAskForFile
+                                #model: #saveSettingsWithoutAskingForFile
                                 #extent: #(#Point 84 22)
                               )
                              #(#ActionButtonSpec
                                 #label: 'Save as...'
                                 #name: 'Button1'
                                 #translateLabel: true
-                                #model: #saveSettingsAndAskForFile
+                                #model: #askForFileAndSaveSettings
                                 #extent: #(#Point 84 22)
                               )
                              #(#ActionButtonSpec
@@ -334,7 +334,7 @@
 
 !SettingsDialog class methodsFor:'menu actions'!
 
-saveSettingsAndAskForFile
+askForFileAndSaveSettings
     |fileName resources|
 
     resources := self classResources.
@@ -362,7 +362,7 @@
     ]
 !
 
-saveSettingsWithoutAskForFile
+saveSettingsWithoutAskingForFile
 
     | file |
     file := (Filename currentDirectory construct:'settings.stx') asAbsoluteFilename.
@@ -1158,6 +1158,10 @@
 
 !SettingsDialog methodsFor:'menu actions'!
 
+askForFileAndSaveSettings
+    self class askForFileAndSaveSettings.
+!
+
 loadSettingsFromFile
 
     "restore settings from a settings-file."
@@ -1187,12 +1191,8 @@
     ].
 !
 
-saveSettingsAndAskForFile
-    self class saveSettingsAndAskForFile.
-!
-
-saveSettingsWithoutAskForFile
-    self class saveSettingsWithoutAskForFile.
+saveSettingsWithoutAskingForFile
+    self class saveSettingsWithoutAskingForFile.
 ! !
 
 !SettingsDialog::HierarchicalApplicationList::ApplicationItem methodsFor:'accessing'!
@@ -1289,7 +1289,7 @@
 !SettingsDialog class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.46 2004-01-13 15:37:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.47 2004-01-29 23:48:41 ca Exp $'
 ! !
 
 SettingsDialog initialize!