--- a/InspectorView.st	Sat Aug 22 00:04:30 2015 +0100
+++ b/InspectorView.st	Mon Aug 24 10:07:46 2015 +0100
@@ -2959,12 +2959,14 @@
         names do:[:eachIdx |
             |val|
 
-            padLeft ifTrue:[
-                s nextPutAll:(eachIdx printStringLeftPaddedTo:maxLen).
-            ] ifFalse:[
-                s nextPutAll:((eachIdx printString , ' ') paddedTo:maxLen+1 with:$.).
+            self isIndexShown ifTrue:[
+                padLeft ifTrue:[
+                    s nextPutAll:(eachIdx printStringLeftPaddedTo:maxLen).
+                ] ifFalse:[
+                    s nextPutAll:((eachIdx printString , ' ') paddedTo:maxLen+1 with:$.).
+                ].
+                s nextPutAll:' : '.
             ].
-            s nextPutAll:' : '.
 
             val := self indexedValueAtKey:eachIdx.
 
@@ -3841,6 +3843,10 @@
     ^ dereferenceValueHolders ? false
 !
 
+isIndexShown
+    ^ true
+!
+
 labelFor:anObject
     "return the windowLabel to use in my topView, when inspecting anObject."