--- a/DebugView.st Fri Aug 30 00:43:28 2013 +0200
+++ b/DebugView.st Fri Aug 30 01:58:12 2013 +0200
@@ -5205,7 +5205,8 @@
self
findContextForWhich:[:con |
- con isHandleContext and:[ con receiver accepts:exClass]
+ con isHandleContext
+ and:[ (con receiver handlerForSignal:exClass context:con originator:nil) notNil ]
]
thenDo:[:con |
self selectContext:con sender.
@@ -8867,15 +8868,15 @@
!DebugView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.623 2013-08-29 22:43:28 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.624 2013-08-29 23:58:12 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.623 2013-08-29 22:43:28 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.624 2013-08-29 23:58:12 cg Exp $'
!
version_SVN
- ^ '$Id: DebugView.st,v 1.623 2013-08-29 22:43:28 cg Exp $'
+ ^ '$Id: DebugView.st,v 1.624 2013-08-29 23:58:12 cg Exp $'
! !