InspectorView.st
branchjv
changeset 16714 b68566960d22
parent 16643 9fcec4cdfc7e
parent 16713 6fc5c0d48f98
child 16760 6ce6b708f34d
--- a/InspectorView.st	Wed Jun 22 06:45:59 2016 +0200
+++ b/InspectorView.st	Sat Jun 25 06:59:09 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:' : '.
             ].