class: AbstractSettingsApplication
authorClaus Gittinger <cg@exept.de>
Mon, 16 Jun 2014 15:20:19 +0200
changeset 14515 14584fa647c7
parent 14514 d18c6b0a399f
child 14516 805d42ab3c16
class: AbstractSettingsApplication
AbstractSettingsApplication.st
--- a/AbstractSettingsApplication.st	Mon Jun 16 15:12:10 2014 +0200
+++ b/AbstractSettingsApplication.st	Mon Jun 16 15:20:19 2014 +0200
@@ -331,7 +331,8 @@
 	instanceVariableNames:'classInfos vmInfo vmErrors displayErrors logDoits updChanges
 		changeFileName beepForInfoDialog beepForWarningDialog
 		beepForErrorDialog flyByHelp beepEnabled beepInEditor
-		toolTipAutoHideDelay sendMessagesAlsoToTranscript'
+		toolTipAutoHideDelay sendMessagesAlsoToTranscript
+		onlyShowTooltipsForActiveWindow'
 	classVariableNames:''
 	poolDictionaries:''
 	privateIn:AbstractSettingsApplication
@@ -16855,6 +16856,14 @@
     ^ logDoits.
 !
 
+onlyShowTooltipsForActiveWindow
+    onlyShowTooltipsForActiveWindow isNil ifTrue:[
+        onlyShowTooltipsForActiveWindow := true asValue.
+        onlyShowTooltipsForActiveWindow onChangeSend:#updateModifiedChannel to:self
+    ].
+    ^ onlyShowTooltipsForActiveWindow.
+!
+
 sendMessagesAlsoToTranscript
     sendMessagesAlsoToTranscript isNil ifTrue:[
         sendMessagesAlsoToTranscript := true asValue.
@@ -18368,10 +18377,10 @@
 !AbstractSettingsApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.549 2014-06-16 13:12:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.550 2014-06-16 13:20:19 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.549 2014-06-16 13:12:10 cg Exp $'
-! !
-
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.550 2014-06-16 13:20:19 cg Exp $'
+! !
+