--- a/DebugView.st	Fri Jul 30 20:35:38 1999 +0200
+++ b/DebugView.st	Sat Jul 31 14:39:32 1999 +0200
@@ -10,8 +10,6 @@
  hereby transferred.
 "
 
-'From Smalltalk/X, Version:3.5.3 on 26-jul-1999 at 15:45:55'                    !
-
 StandardSystemView subclass:#DebugView
 	instanceVariableNames:'busy haveControl exitAction canContinue contextView codeView
 		receiverInspector contextInspector contextArray selectedContext
@@ -3126,6 +3124,7 @@
     ) ifTrue:[
         sel == #handle:do: ifTrue:[^ false].
         sel == #raise ifTrue:[^ false].
+        (sel startsWith:#raiseRequest) ifTrue:[^ false].
     ].
     (mClass == QuerySignal) ifTrue:[
         sel == #answer:do: ifTrue:[^ false].
@@ -3133,7 +3132,7 @@
     (mClass == Exception) ifTrue:[
         sel == #doRaise ifTrue:[^ false].
         sel == #doCallHandler: ifTrue:[^ false].
-        sel == #raise ifTrue:[
+        (sel == #raise or:[sel == #raiseRequest]) ifTrue:[
             senderReceiverClass == Signal ifTrue:[^ false].
         ]
     ].
@@ -3956,6 +3955,6 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.233 1999-07-28 15:14:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.234 1999-07-31 12:39:32 cg Exp $'
 ! !
 DebugView initialize!