--- a/InspectorView.st	Tue Nov 16 15:29:18 2010 +0100
+++ b/InspectorView.st	Wed Nov 17 20:09:56 2010 +0100
@@ -2166,7 +2166,7 @@
     "Modified: / 24-08-2010 / 17:29:08 / cg"
 !
 
-displayStringForValue:someValue 
+displayStringForValue:someValue
     "return the value's displayString to be pasted into the workspace."
 
     |idx sel extraAttributes|
@@ -2177,7 +2177,7 @@
 
         extraAttributes := object inspectorExtraAttributes.
         (extraAttributes notNil and:[extraAttributes includesKey:sel]) ifTrue:[
-            ^ (extraAttributes at:sel) value printString
+            ^ someValue "(extraAttributes at:sel) value" printString
         ].
 
         (sel startsWith:'-all inst vars') ifTrue:[
@@ -2198,7 +2198,7 @@
     ].
     ^ self basicDisplayStringForValue:someValue
 
-    "Modified: / 05-11-2007 / 20:06:44 / cg"
+    "Modified: / 17-11-2010 / 19:20:47 / cg"
 !
 
 selection:lineNr
@@ -2418,9 +2418,9 @@
 !InspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.220 2010-11-11 16:14:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.221 2010-11-17 19:09:56 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.220 2010-11-11 16:14:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.221 2010-11-17 19:09:56 cg Exp $'
 ! !