--- a/Tools__VariableList.st	Fri Jul 29 17:23:53 2016 +0100
+++ b/Tools__VariableList.st	Fri Jul 29 21:32:35 2016 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2000 by eXept Software AG
 	      All Rights Reserved
@@ -848,7 +846,7 @@
             "/ Hack for Java classes to display field type
             class theNonMetaclass isJavaClass ifTrue:[
                 | field |
-                field := class theNonMetaclass lookupFieldFor:name static: (class isMetaclass) onlyPublic: false.
+                field := class theNonMetaclass lookupFieldFor:name static: (class isMetaclass).
                 field notNil ifTrue:[
                     label := label asText , 
                             ' ' , 
@@ -861,7 +859,7 @@
     ^label
 
     "Created: / 16-12-2011 / 00:54:58 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 07-10-2013 / 08:29:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 29-07-2016 / 21:29:58 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 labelWithClass
@@ -943,5 +941,10 @@
 
 version_CVS
     ^ '$Header$'
+!
+
+version_HG
+
+    ^ '$Changeset: <not expanded> $'
 ! !