--- a/TreeItem.st	Fri Jun 28 09:21:50 2019 +0200
+++ b/TreeItem.st	Fri Jun 28 09:22:40 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1997 by eXept Software AG / Claus Gittinger
               All Rights Reserved
@@ -861,12 +863,13 @@
     ].
 
     aGCOrStream 
-        nextPutAll:self class name;
+        nextPutAll:self className;
         nextPut:$(.
     self printOn:aGCOrStream. 
     aGCOrStream nextPut:$)
 
     "Modified (comment): / 22-02-2017 / 16:48:13 / cg"
+    "Modified: / 28-06-2019 / 09:22:22 / Claus Gittinger"
 !
 
 printOn:aStream