mhmhmh
authorsr
Tue, 18 Nov 2008 12:48:13 +0100
changeset 8437 4ccccc3482b3
parent 8436 9d37d5a998ca
child 8438 f47282d57440
mhmhmh
ContextInspectorView.st
--- a/ContextInspectorView.st	Mon Nov 17 23:37:00 2008 +0100
+++ b/ContextInspectorView.st	Tue Nov 18 12:48:13 2008 +0100
@@ -576,7 +576,10 @@
     inspectedContext isNil ifTrue:[^ nil].
 
     varIdx := lineNr.
-    ((l := listView at:lineNr) startsWith:$-) ifTrue:[
+    l := listView at:lineNr.
+    l isNil ifTrue:[ ^nil].
+
+    (l startsWith:$-) ifTrue:[
         (l ~= '-') ifTrue:[
             ^ self valueForSpecialLine:(listView at:lineNr)
         ].
@@ -640,5 +643,5 @@
 !ContextInspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.65 2007-02-09 15:11:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.66 2008-11-18 11:48:13 sr Exp $'
 ! !