--- a/ActiveHelp.st	Sat Dec 08 02:11:11 2001 +0100
+++ b/ActiveHelp.st	Sat Dec 08 02:11:18 2001 +0100
@@ -336,6 +336,7 @@
     "handle motion events - if the mousepointer left the 
      previous helped view, hide the help"
 
+'m2' printCR.
     Object errorSignal handle:[:ex |
         ex description infoPrintCR.
         ex suspendedContext fullPrintAll.
@@ -373,12 +374,14 @@
 pointerEnter:state x:x y:y view:aView
     "handle pointer entering a view; setup timeOut to show help"
 
+'e' printCR.
     ^ self buttonMotion:state x:x y:y view:aView
 !
 
 pointerLeave:state view:view
     "handle pointer leaving a view; hide help text"
 
+'l2' printCR.
     self hideHelpIgnoringErrors.
     ^ false
 ! !
@@ -630,6 +633,6 @@
 !ActiveHelp class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.43 2001-12-08 00:35:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.44 2001-12-08 01:11:18 cg Exp $'
 ! !
 ActiveHelp initialize!