--- a/InspectorView.st	Tue May 28 22:46:27 2013 +0100
+++ b/InspectorView.st	Fri May 31 00:35:44 2013 +0100
@@ -104,7 +104,6 @@
 "
 ! !
 
-
 !InspectorView class methodsFor:'instance creation'!
 
 for:anObject
@@ -204,7 +203,6 @@
     ^ self openOn:anObject
 ! !
 
-
 !InspectorView class methodsFor:'common label support'!
 
 commonLabelFor:anObject
@@ -281,7 +279,6 @@
     "Created: / 15-07-2011 / 16:20:06 / cg"
 ! !
 
-
 !InspectorView class methodsFor:'defaults'!
 
 defaultExtent
@@ -359,7 +356,6 @@
     "Created: / 23-10-2007 / 19:10:02 / cg"
 ! !
 
-
 !InspectorView class methodsFor:'image specs'!
 
 imageFor_arrays
@@ -757,7 +753,6 @@
 M#L3NBH"H#\@@@@@@@@@@@@-JS 8JSH@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@a') ; colorMapFromArray:#[226 226 226 176 176 176 155 155 155 169 169 169 152 152 152 164 164 164 149 149 149 192 192 192 240 240 240 255 255 255 202 202 202 201 201 201 151 151 151 162 162 162 148 148 148 158 158 158 173 173 173 154 154 154 167 167 167 150 150 150 160 160 160 180 180 180 156 156 156 170 170 170 153 153 153 165 165 165 183 183 183 98 255 0 75 198 0 25 74 0 57 156 0 34 99 0 92 206 16 60 132 16 31 74 0 79 206 0 128 131 142 88 231 0 70 189 0 38 90 0 148 198 123 57 115 16 92 239 0 103 255 8 76 189 0 154 198 123 85 214 0 53 132 0 106 255 0 138 255 49 107 156 74 44 115 0 119 206 66 85 222 0 142 206 99 68 139 33 33 90 0 57 148 0 135 206 99]; mask:((Depth1Image new) width: 16; height: 16; photometric:(#blackIs0); bitsPerSample:(#[1]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@@A>@O<A?8G? _>A?8G? _>@?0A>@@@@@@@@@b') ; yourself); yourself]
 ! !
 
-
 !InspectorView class methodsFor:'queries-plugin'!
 
 aspectSelectors
@@ -766,7 +761,6 @@
     "Modified: / 10.2.2000 / 12:25:28 / cg"
 ! !
 
-
 !InspectorView methodsFor:'accessing'!
 
 allowFollow:aBoolean
@@ -962,7 +956,6 @@
     ^ workspace
 ! !
 
-
 !InspectorView methodsFor:'accessing-channels'!
 
 inspectedObjectHolder
@@ -988,7 +981,6 @@
     "Created: / 10.2.2000 / 13:34:53 / cg"
 ! !
 
-
 !InspectorView methodsFor:'change & update'!
 
 holderChanged:aValueHolder
@@ -1024,7 +1016,6 @@
     "Modified: / 10.2.2000 / 13:48:18 / cg"
 ! !
 
-
 !InspectorView methodsFor:'drag & drop'!
 
 getDisplayObjects
@@ -1043,7 +1034,6 @@
     "Modified: / 18-09-2006 / 21:11:31 / cg"
 ! !
 
-
 !InspectorView methodsFor:'event handling'!
 
 doubleClickOnLine:lineNr
@@ -1101,7 +1091,6 @@
     ].
 ! !
 
-
 !InspectorView methodsFor:'initialization & release'!
 
 destroy
@@ -1261,7 +1250,6 @@
     ].
 ! !
 
-
 !InspectorView methodsFor:'menu'!
 
 fieldMenu
@@ -1636,7 +1624,6 @@
     "Created: / 20-07-2012 / 10:47:53 / cg"
 ! !
 
-
 !InspectorView methodsFor:'menu actions'!
 
 browse
@@ -2143,7 +2130,6 @@
     "Modified: / 6.2.2000 / 13:47:37 / cg"
 ! !
 
-
 !InspectorView methodsFor:'presentation'!
 
 appendDisplayStringForElementsOf:val indent:lvl pad:padding to:aStream
@@ -2171,7 +2157,7 @@
     maxStringLength := 100000.
 
     Error handle:[:ex |
-        (ex signal == WriteError and:[s isStream]) ifTrue:[
+        (ex creator == WriteError and:[s isStream]) ifTrue:[
             "hit the write limit"
             s writeLimit:nil.
             s nextPutAll:' ...'.
@@ -2366,7 +2352,7 @@
     value class == ValueHolder ifTrue:[
         s := self plainValueStringInListEntryForValue:value value.
         s notNil ifTrue:[
-            ^ '[[' , s , ']]'
+            ^ '{' , s , '}'
         ].
         ^ nil
     ].
@@ -2492,14 +2478,15 @@
 
     |valString|
 
-    valString := self plainValueStringInListEntryForValue:value.
-    valString isNil ifTrue:[^ ''].
-    ^ ' <',valString,'>'
+    valString := (self plainValueStringInListEntryForValue:value) ? ''.
+    (inspectedObject notNil and:[value == inspectedObject]) ifTrue:[
+        ^ ' (',valString,') (==self)' 
+    ].
+    ^ ' (',valString,')'
 
     "Created: / 13-06-2012 / 12:04:31 / cg"
 ! !
 
-
 !InspectorView methodsFor:'private'!
 
 baseInspectedObjectClass
@@ -3233,7 +3220,6 @@
     "Modified: / 06-06-2012 / 11:57:54 / cg"
 ! !
 
-
 !InspectorView methodsFor:'queries'!
 
 canInspect:anObject
@@ -3298,7 +3284,6 @@
     ^ suppressPseudoSlots ? false
 ! !
 
-
 !InspectorView methodsFor:'selection'!
 
 selection:lineNr
@@ -3354,7 +3339,6 @@
     "Modified: / 28-10-2012 / 11:03:04 / cg"
 ! !
 
-
 !InspectorView methodsFor:'user interaction'!
 
 doAccept:theText
@@ -3510,7 +3494,6 @@
     "Created: / 16-11-2001 / 13:48:51 / cg"
 ! !
 
-
 !InspectorView methodsFor:'workspace protocol'!
 
 modified:aBoolean
@@ -3521,15 +3504,14 @@
     workspace saveAs:file doAppend:doAppend
 ! !
 
-
 !InspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.305 2013-04-04 07:42:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.309 2013-05-28 19:30:59 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.305 2013-04-04 07:42:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.309 2013-05-28 19:30:59 cg Exp $'
 !
 
 version_HG