--- a/ActiveHelp.st	Wed Feb 26 16:10:56 2014 +0100
+++ b/ActiveHelp.st	Thu Feb 27 16:03:10 2014 +0100
@@ -371,6 +371,7 @@
 "/        realViewUnderCursor := aView device viewFromPoint:(aView pointerPosition).
 "/        realP := aView device translatePoint:(x@y) fromView:aView toView:realViewUnderCursor.
 "/        self handleMouseIn:realViewUnderCursor x:realP x y:realP y.
+        Debugging ifTrue:['motion' infoPrintCR].
         self handleMouseIn:aView x:x y:y.
     ].
     ^ false
@@ -408,6 +409,9 @@
 !
 
 processEvent:ev
+    Debugging ifTrue:[
+        'event: ' infoPrint. ev infoPrintCR.
+    ].
     (ev isPointerEnterLeaveEvent
     or:[ ev isButtonEvent
     or:[ ev isKeyEvent ]]) ifTrue:[
@@ -541,8 +545,15 @@
     "handle motion events - if the mousepointer left the 
      previous helped view, hide the help"
 
-    aView topView isActive ifFalse:[^ self].
-    (self interestedIn:aView) ifFalse:[^ self].
+    Debugging ifTrue:['mouse in' infoPrintCR].
+    aView topView isActive ifFalse:[
+        Debugging ifTrue:['topview inactive' infoPrintCR].
+        ^ self
+    ].
+    (self interestedIn:aView) ifFalse:[
+        Debugging ifTrue:['not interested' infoPrintCR].
+        ^ self
+    ].
 
     Error handle:[:ex |
         '---------------------' infoPrintCR.
@@ -553,10 +564,12 @@
         |sensor|
 
 "/        self stopHelpDisplayProcess.
+        Debugging ifTrue:['hideIf' infoPrintCR].
         self hideIfPointerLeft:aView.
 
         "/ check again, in case the stop/hide changed something...
         (self interestedIn:aView) ifFalse:[
+            Debugging ifTrue:['not interested2' infoPrintCR].
             ^ self
         ].
 
@@ -749,6 +762,6 @@
 !ActiveHelp class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.74 2013-09-12 08:30:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.75 2014-02-27 15:03:10 cg Exp $'
 ! !