--- a/DebugView.st	Tue Sep 18 09:42:54 2007 +0200
+++ b/DebugView.st	Thu Sep 20 11:37:52 2007 +0200
@@ -4778,8 +4778,9 @@
             verboseBacktrace ~~ true ifTrue:[
                 (con isBlockContext
                  and:[(h := con home) == con sender
+                 and:[h notNil
                  and:[(self setOfHiddenCallingSelectors includes:h selector)
-                 and:[h method who isNil]]]) ifTrue:[
+                 and:[h method who isNil]]]]) ifTrue:[
                     calledContext := con.
                     con := con sender.
                     text removeLast.
@@ -6050,7 +6051,7 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.419 2007-08-18 14:49:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.420 2007-09-20 09:37:52 stefan Exp $'
 ! !
 
 DebugView initialize!