InspectorView.st
changeset 16713 6fc5c0d48f98
parent 16640 3e0634b25d8e
child 16714 b68566960d22
child 16758 a5c09d35f59a
--- a/InspectorView.st	Tue Jun 21 10:26:33 2016 +0200
+++ b/InspectorView.st	Fri Jun 24 16:08:44 2016 +0200
@@ -3052,9 +3052,9 @@
     s := CharacterWriteStream on:''.
     names := self indexList.
     names size > 0 ifTrue:[
-        maxLen := names inject:0 into:[:maxSoFar :eachName | (eachName printString size) max:maxSoFar]. 
+        maxLen := names inject:0 into:[:maxSoFar :eachName | (eachName displayString size) max:maxSoFar]. 
         padLeft := names conform:[:eachIdx | eachIdx isInteger].  
-        
+
         names do:[:eachIdx |
             |val|
 
@@ -3062,7 +3062,7 @@
                 padLeft ifTrue:[
                     s nextPutAll:(eachIdx printStringLeftPaddedTo:maxLen).
                 ] ifFalse:[
-                    s nextPutAll:((eachIdx printString , ' ') paddedTo:maxLen+1 with:$.).
+                    s nextPutAll:((eachIdx displayString , ' ') paddedTo:maxLen+1 with:$.).
                 ].
                 s nextPutAll:' : '.
             ].