--- a/HierarchicalItem.st	Sat May 02 16:47:07 2015 +0200
+++ b/HierarchicalItem.st	Sat May 02 16:48:21 2015 +0200
@@ -72,18 +72,26 @@
 !HierarchicalItem methodsFor:'accessing'!
 
 height
+    "return the cached height"
+
     ^ height
 !
 
 height:something
+    "set the cached height"
+
     height := something.
 !
 
 width
+    "return the cached width"
+
     ^ width
 !
 
 width:something
+    "set the cached width"
+
     width := something.
 ! !
 
@@ -267,10 +275,10 @@
 !HierarchicalItem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.112 2015-05-02 14:47:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.113 2015-05-02 14:48:21 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.112 2015-05-02 14:47:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.113 2015-05-02 14:48:21 cg Exp $'
 ! !