class: ActiveHelp
authorClaus Gittinger <cg@exept.de>
Wed, 03 Dec 2014 22:02:30 +0100
changeset 3417 6181a91c933a
parent 3416 0741150eb5ae
child 3418 a758dd978f99
class: ActiveHelp changed: #handleMouseIn:x:y: #interestedIn:
ActiveHelp.st
--- a/ActiveHelp.st	Wed Dec 03 15:37:02 2014 +0100
+++ b/ActiveHelp.st	Wed Dec 03 22:02:30 2014 +0100
@@ -569,12 +569,6 @@
      previous helped view, hide the help"
 
     Debugging ifTrue:['mouse in' infoPrintCR].
-    true "aView topView isActive" ifFalse:[
-        Debugging ifTrue:[
-            'topview inactive' infoPrintCR
-        ].
-        ^ self
-    ].
     (self interestedIn:aView) ifFalse:[
         Debugging ifTrue:['not interested 0' infoPrintCR].
         ^ self
@@ -636,6 +630,11 @@
     aViewsTopView := aView topView.
 
     UserPreferences current onlyShowTooltipsForActiveWindow ifTrue:[
+        aViewsTopView isActive ifFalse:[
+            Debugging ifTrue:[ 'topview inactive' infoPrintCR].
+            ^ false
+        ].
+
         "/ if none of the view's components has focus...
         (device := aViewsTopView graphicsDevice) notNil ifTrue:[
             (deviceFocusView := device focusView) notNil ifTrue:[
@@ -816,7 +815,7 @@
 !ActiveHelp class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.81 2014-11-20 16:58:25 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.82 2014-12-03 21:02:30 cg Exp $'
 ! !