# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1367950312 -7200
# Node ID 68e6a80fb65ea5e8a019032293b8ab908a9df4f9
# Parent  e890b4041563025a958e3dde372cf88d93c6aec2
class: InspectorView
changed: #valueStringInListEntryForValue:

diff -r e890b4041563 -r 68e6a80fb65e InspectorView.st
--- a/InspectorView.st	Tue May 07 18:58:28 2013 +0200
+++ b/InspectorView.st	Tue May 07 20:11:52 2013 +0200
@@ -2479,7 +2479,7 @@
     |valString|
 
     valString := (self plainValueStringInListEntryForValue:value) ? ''.
-    value == inspectedObject ifTrue:[
+    (inspectedObject notNil and:[value == inspectedObject]) ifTrue:[
         ^ ' <',valString,' (==self)>' 
     ].
     ^ ' <',valString,'>'
@@ -3507,10 +3507,10 @@
 !InspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.307 2013-04-23 16:37:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.308 2013-05-07 18:11:52 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.307 2013-04-23 16:37:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.308 2013-05-07 18:11:52 cg Exp $'
 ! !