--- a/tools/JavaMapInspectorView.st	Fri Mar 22 13:29:20 2019 +0100
+++ b/tools/JavaMapInspectorView.st	Wed Apr 03 08:32:45 2019 +0200
@@ -1,5 +1,9 @@
+"{ Encoding: utf8 }"
+
 "{ Package: 'stx:libjava/tools' }"
 
+"{ NameSpace: Smalltalk }"
+
 DictionaryInspectorView subclass:#JavaMapInspectorView
 	instanceVariableNames:''
 	classVariableNames:''
@@ -36,13 +40,6 @@
 
 !JavaMapInspectorView methodsFor:'private'!
 
-allNumericKeys
-
-    ^false "for now"
-
-    "Created: / 04-12-2011 / 17:38:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
 baseInspectedObjectClass
 
     | cls |
@@ -56,6 +53,13 @@
     "Modified: / 25-07-2014 / 09:39:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
+hasAllNumericKeys
+
+    ^false "for now"
+
+    "Created: / 03-04-2019 / 08:23:59 / Claus Gittinger"
+!
+
 indexList
     "return a list of indexes to show in the selectionList.
      Set hasMore to true, if a '...' entry should be added."
@@ -64,7 +68,7 @@
 
     allShown := (inspectedObject perform: #'size()I') <= nShown.
 
-    (allShown and:[self allNumericKeys]) ifTrue:[
+    (allShown and:[self hasAllNumericKeys]) ifTrue:[
         sortBlockForKeys := [:a :b | a < b].
     ] ifFalse:[
         sortBlockForKeys := [:a :b | a displayString < b displayString].
@@ -85,6 +89,7 @@
 
     "Modified: / 10-05-2011 / 08:14:59 / cg"
     "Created: / 04-12-2011 / 17:38:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 03-04-2019 / 08:24:11 / Claus Gittinger"
 !
 
 valueForSpecialLine:line
@@ -131,7 +136,7 @@
 !JavaMapInspectorView class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libjava/tools/JavaMapInspectorView.st,v 1.5 2015-03-20 13:29:52 vrany Exp $'
+    ^ '$Header$'
 !
 
 version_HG
@@ -140,6 +145,6 @@
 !
 
 version_SVN
-    ^ 'Id'
+    ^ '$Id$'
 ! !