--- a/InspectorView.st	Tue May 28 20:52:32 2013 +0200
+++ b/InspectorView.st	Tue May 28 21:30:59 2013 +0200
@@ -2352,7 +2352,7 @@
     value class == ValueHolder ifTrue:[
         s := self plainValueStringInListEntryForValue:value value.
         s notNil ifTrue:[
-            ^ '[[' , s , ']]'
+            ^ '{' , s , '}'
         ].
         ^ nil
     ].
@@ -2480,9 +2480,9 @@
 
     valString := (self plainValueStringInListEntryForValue:value) ? ''.
     (inspectedObject notNil and:[value == inspectedObject]) ifTrue:[
-        ^ ' <',valString,' (==self)>' 
+        ^ ' (',valString,') (==self)' 
     ].
-    ^ ' <',valString,'>'
+    ^ ' (',valString,')'
 
     "Created: / 13-06-2012 / 12:04:31 / cg"
 ! !
@@ -3507,10 +3507,10 @@
 !InspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.308 2013-05-07 18:11:52 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.308 2013-05-07 18:11:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.309 2013-05-28 19:30:59 cg Exp $'
 ! !