--- a/ActiveHelp.st	Tue Aug 18 20:15:59 1998 +0200
+++ b/ActiveHelp.st	Wed Aug 19 15:38:41 1998 +0200
@@ -333,15 +333,19 @@
     "handle motion events - if the mousepointer left the 
      previous helped view, hide the help"
 
-    "/ ignore my own help-view
-    aView topView == currentHelpView ifTrue:[
-       ^ true
-    ].
+    Object errorSignal handle:[:ex |
+        ex return
+    ] do:[
+        "/ ignore my own help-view
+        aView topView == currentHelpView ifTrue:[
+           ^ true
+        ].
 
-    (self interestedIn:aView) ifTrue:[
-        self stopHelpDisplayProcess.
-        self hideIfPointerLeft:aView.
-        self initiateHelpFor:aView atX:x y:y.
+        (self interestedIn:aView) ifTrue:[
+            self stopHelpDisplayProcess.
+            self hideIfPointerLeft:aView.
+            self initiateHelpFor:aView atX:x y:y.
+        ].
     ].
     ^ false
 
@@ -351,7 +355,11 @@
 buttonPress:state x:x y:y view:view
     "handle button press - unconditionally hide the help"
 
-    self hideHelp.
+    Object errorSignal handle:[:ex |
+        ex return
+    ] do:[
+        self hideHelp.
+    ].
     ^ false
 
     "Modified: / 28.7.1998 / 02:52:00 / cg"
@@ -360,7 +368,11 @@
 keyPress:state x:x y:y view:view
     "handle key press - unconditionally hide the help"
 
-    self hideHelp.
+    Object errorSignal handle:[:ex |
+        ex return
+    ] do:[
+        self hideHelp.
+    ].
     ^ false
 
     "Modified: 27.4.1996 / 15:09:57 / cg"
@@ -374,10 +386,14 @@
        ^ true
     ].
 
-    (self interestedIn:aView) ifTrue:[
-        self stopHelpDisplayProcess.
-        self hideIfPointerLeft:aView.
-        self initiateHelpFor:aView atX:x y:y.
+    Object errorSignal handle:[:ex |
+        ex return
+    ] do:[
+        (self interestedIn:aView) ifTrue:[
+            self stopHelpDisplayProcess.
+            self hideIfPointerLeft:aView.
+            self initiateHelpFor:aView atX:x y:y.
+        ].
     ].
     ^ false
 
@@ -387,7 +403,11 @@
 pointerLeave:state view:view
     "handle pointer leaving a view; hide help text"
 
-    self hideIfPointerLeft:view.
+    Object errorSignal handle:[:ex |
+        ex return
+    ] do:[
+        self hideIfPointerLeft:view.
+    ].
     ^ false
 
     "Modified: / 28.7.1998 / 02:52:16 / cg"
@@ -759,6 +779,6 @@
 !ActiveHelp class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.34 1998-08-08 11:36:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.35 1998-08-19 13:38:41 cg Exp $'
 ! !
 ActiveHelp initialize!