--- a/FlyByHelp.st	Wed Feb 27 15:56:29 2019 +0100
+++ b/FlyByHelp.st	Wed Feb 27 15:56:55 2019 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2001 by eXept Software AG
               All Rights Reserved
@@ -252,7 +250,7 @@
     |prevView text|
 
     currentHelpView notNil ifTrue:[
-        key == $§ ifTrue:[
+        key == $§ ifTrue:[
             "/ generate a line suitable for the resources file (a null translation)
             "/ into the clipboard; makes it easy to add missing translations to a .rs file,
             "/ by pressing paragraph whenever you see an untranslated helptext
@@ -525,6 +523,9 @@
     |text delayTime|
 
     (self interestedIn:aView) ifFalse:[
+        Debugging ifTrue:[
+            'not interested' infoPrintCR
+        ].    
         ^ self
     ].
 
@@ -557,6 +558,9 @@
     ].
     
     (lastHelpText = text and:[lastHelpWidget == aView]) ifTrue:[ 
+        Debugging == true ifTrue:[
+            'same text: ' infoPrint. text infoPrintCR.
+        ].    
         self toolTipFollowsMouse ifFalse:[
             ^ self
         ]
@@ -588,7 +592,7 @@
 
     "Modified: / 22-03-2011 / 19:10:28 / cg"
     "Modified: / 16-04-2018 / 12:20:33 / stefan"
-    "Modified: / 22-02-2019 / 09:42:56 / Claus Gittinger"
+    "Modified: / 27-02-2019 / 11:28:52 / Claus Gittinger"
 !
 
 showHelp:aHelpText for:view