# HG changeset patch
# User Stefan Vogel <sv@exept.de>
# Date 1106748572 -3600
# Node ID 4b5bbc9c49d1e45669941da297b0ffe413a455e6
# Parent  5ea312ba7d88208611ffa24fd0e1b57abafbeaa4
Use class based exceptions.
Documentation.

diff -r 5ea312ba7d88 -r 4b5bbc9c49d1 DebugView.st
--- a/DebugView.st	Fri Jan 21 18:13:39 2005 +0100
+++ b/DebugView.st	Wed Jan 26 15:09:32 2005 +0100
@@ -5038,12 +5038,12 @@
             signal := ex signal.
 
             DebuggingDebugger ~~ true ifTrue:[
+                (signal == ActivityNotification) ifTrue:[
+                    ex proceed
+                ].
                 "/
                 "/ ignore recursive breakpoints
                 "/
-                (signal == ActivityNotificationSignal) ifTrue:[
-                    ex proceed
-                ].
                 (signal isControlInterrupt) ifTrue:[
                     ignoreBreakpoints == true ifTrue:[
                         'DebugView [info]: halt/break in debugger ignored 1' infoPrintCR.
@@ -5867,7 +5867,7 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.378 2005-01-21 17:13:39 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.379 2005-01-26 14:09:32 stefan Exp $'
 ! !
 
 DebugView initialize!