--- a/FlyByHelp.st	Tue Sep 03 17:23:02 2013 +0200
+++ b/FlyByHelp.st	Tue Sep 03 17:23:55 2013 +0200
@@ -251,8 +251,10 @@
     ] valueWithWatchDog:[ ^ self ] afterMilliseconds:(self flyByHelpTimeoutMillis).
 
     lastHelpText = text ifTrue:[
-        self toolTipFollowsMouse ifFalse:[
-            ^ self
+        lastHelpWidget == aView ifTrue:[ 
+            self toolTipFollowsMouse ifFalse:[
+                ^ self
+            ]
         ]
     ].
 
@@ -339,6 +341,7 @@
             ^ self
         ]
     ].
+    lastHelpWidget := view.
 
     lastHelpText := aHelpText.
 
@@ -420,10 +423,10 @@
 !FlyByHelp class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/FlyByHelp.st,v 1.55 2013-08-31 11:58:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/FlyByHelp.st,v 1.56 2013-09-03 15:23:55 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/FlyByHelp.st,v 1.55 2013-08-31 11:58:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/FlyByHelp.st,v 1.56 2013-09-03 15:23:55 cg Exp $'
 ! !