--- a/SettingsDialog.st	Thu Nov 01 13:18:00 2012 +0100
+++ b/SettingsDialog.st	Thu Nov 01 14:52:37 2012 +0100
@@ -241,6 +241,25 @@
     ^ AbstractLauncherApplication resourcePackName
 ! !
 
+!SettingsDialog class methodsFor:'help'!
+
+flyByHelpSpec
+    <resource: #help>
+
+    ^ super flyByHelpSpec addPairsFrom:#(
+
+#acceptChangedSettings
+'Accept changed settings for the current ST/X session.\Notice, that these affect the current session only.\To make the current settings the default for futre settings, save them to the settings file (using the "Save" button). Also notice, that some values affect new opened windows/tools only.'
+
+#discardChangedSettings
+'Discard changes and revert to the current active settings values'
+
+#helpOnSettings
+'Show the online documentation on the shown values in an HTML viewer'
+
+)
+! !
+
 !SettingsDialog class methodsFor:'interface specs'!
 
 windowSpec
@@ -383,6 +402,7 @@
                                 tabable: true
                                 model: doSave
                                 enableChannel: enableOK
+                                activeHelpKey: acceptChangedSettings
                                 extent: (Point 168 22)
                               )
                              (ActionButtonSpec
@@ -392,6 +412,7 @@
                                 tabable: true
                                 model: doReload
                                 enableChannel: enableReload
+                                activeHelpKey: discardChangedSettings
                                 extent: (Point 169 22)
                               )
                              (ActionButtonSpec
@@ -402,6 +423,7 @@
                                 model: help
                                 enableChannel: enableHelp
                                 extent: (Point 169 22)
+                                activeHelpKey: helpOnSettings
                               )
                              )
                            
@@ -1569,11 +1591,11 @@
 !SettingsDialog class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.98 2012-08-10 10:45:42 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.99 2012-11-01 13:52:37 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.98 2012-08-10 10:45:42 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.99 2012-11-01 13:52:37 cg Exp $'
 !
 
 version_SVN