--- a/AbstractHierarchicalItem.st	Wed Aug 15 12:39:36 2018 +0200
+++ b/AbstractHierarchicalItem.st	Wed Aug 15 14:02:09 2018 +0200
@@ -1060,11 +1060,13 @@
 
 labelChanged
     "called if the label has changed.
-     Clear the precomputed width and height"
+     Clear the precomputed width and height, and invalidate"
 
     self makeWidthAndHeightUnknown.
+    self invalidate
 
     "Created: / 17-01-2011 / 17:43:42 / cg"
+    "Modified: / 15-08-2018 / 12:43:20 / Claus Gittinger"
 ! !
 
 !AbstractHierarchicalItem methodsFor:'enumerating'!