--- a/AbstractHierarchicalItem.st	Sun Aug 12 12:35:51 2018 +0200
+++ b/AbstractHierarchicalItem.st	Sun Aug 12 12:55:00 2018 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1999/2015 by eXept Software AG
               All Rights Reserved
@@ -2021,7 +2023,7 @@
 !AbstractHierarchicalItem methodsFor:'queries'!
 
 isChildOf:anItem
-    "returns true if the item is a child of anItem"
+    "returns true if the item is a child (or grandchild or ...) of anItem"
 
     self synchronized:[
         |item|
@@ -2037,6 +2039,7 @@
     ^ true
 
     "Modified: / 28-07-2018 / 14:02:32 / Claus Gittinger"
+    "Modified (comment): / 12-08-2018 / 12:49:16 / Claus Gittinger"
 !
 
 isCollapsed