SimpleView.st
changeset 8398 d8463a116624
parent 8390 7f91874d225b
child 8423 61d98ad2abf7
--- a/SimpleView.st	Tue Jun 19 14:58:52 2018 +0200
+++ b/SimpleView.st	Tue Jun 19 16:45:10 2018 +0200
@@ -9328,7 +9328,11 @@
      With click-to-focus behavior, this is obviously the current application.
      Use this query with caution, for example, to suppress tooltips for inactive apps."
 
-    ^ windowGroup notNil and:[windowGroup anyViewHasFocus]
+    ^ windowGroup notNil 
+    and:[windowGroup anyViewHasFocus
+         or:[ self graphicsDevice focusWindowGroup == windowGroup]].
+
+    "Modified: / 19-06-2018 / 14:03:15 / Claus Gittinger"
 !
 
 isBorderedWrapper