--- a/DebugView.st Wed Jan 21 20:26:57 2009 +0100
+++ b/DebugView.st Thu Jan 22 00:24:04 2009 +0100
@@ -4755,7 +4755,7 @@
|node definingNode nm nmBold varIdx parentNode receiver con|
"/interval printCR.
- node := self findNodeForInterval:interval.
+ Error handle:[:ex | ] do:[ node := self findNodeForInterval:interval ].
"/node printCR.
node isNil ifTrue:[ ^ self ].
node isVariable ifFalse:[ ^ self ].
@@ -6537,7 +6537,7 @@
!DebugView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.458 2008-12-09 14:02:19 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.459 2009-01-21 23:24:04 cg Exp $'
! !
DebugView initialize!