--- a/HierarchicalList.st	Mon Feb 03 19:21:02 2020 +0100
+++ b/HierarchicalList.st	Mon Feb 03 19:21:10 2020 +0100
@@ -296,7 +296,7 @@
     |index item|
 
     item  := root.
-    index := 1.                 "/ on default discard first entry the root
+    index := 1.                 "/ by default, discard first entry the root
 
     root isNil ifTrue:[
         item := self at:index ifAbsent:nil.