--- a/HierarchicalItem.st	Sun Dec 19 09:22:07 2010 +0100
+++ b/HierarchicalItem.st	Mon Jan 17 17:54:56 2011 +0100
@@ -860,6 +860,15 @@
     "icon changed; optimize redrawing"
 
     self changed:#icon with:nil
+!
+
+labelChanged
+    "called if the label has changed.
+     Clear the precomputed width and height"
+
+    width := height := nil.
+
+    "Created: / 17-01-2011 / 17:43:42 / cg"
 ! !
 
 !HierarchicalItem methodsFor:'enumerating'!
@@ -1955,9 +1964,9 @@
 !HierarchicalItem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.99 2010-11-24 16:26:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.100 2011-01-17 16:54:56 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.99 2010-11-24 16:26:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.100 2011-01-17 16:54:56 cg Exp $'
 ! !