class: UserPreferences
authorClaus Gittinger <cg@exept.de>
Mon, 16 Jun 2014 15:04:38 +0200
changeset 16586 6bfb463aa036
parent 16585 a3ad6aafc186
child 16587 1810332fcba2
class: UserPreferences added: #onlyShowTooltipsForActiveWindow #onlyShowTooltipsForActiveWindow:
UserPreferences.st
--- a/UserPreferences.st	Sat Jun 14 13:25:06 2014 +0200
+++ b/UserPreferences.st	Mon Jun 16 15:04:38 2014 +0200
@@ -4375,6 +4375,22 @@
     "Created: / 14-07-2007 / 16:43:44 / cg"
 !
 
+onlyShowTooltipsForActiveWindow
+    "on a mac (and maybe on others), it is preferable to turn this on"
+
+    ^ self at:#onlyShowTooltipsForActiveWindow ifAbsent:true
+
+    "
+     UserPreferences current onlyShowTooltipsForActiveWindow
+    "
+!
+
+onlyShowTooltipsForActiveWindow:aBooleanOrNil
+    "on a mac (and maybe on others), it is preferable to turn this on"
+
+    ^ self at:#onlyShowTooltipsForActiveWindow put:aBooleanOrNil
+!
+
 sendMessagesAlsoToTranscript
     "return the flag which controls if info/error messages are to be shown
      on both Stderr AND the Transcript, or only on Stderr"
@@ -4932,11 +4948,11 @@
 !UserPreferences class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.374 2014-06-14 11:25:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.375 2014-06-16 13:04:38 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.374 2014-06-14 11:25:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.375 2014-06-16 13:04:38 cg Exp $'
 !
 
 version_SVN