--- a/HierarchicalItem.st Tue Sep 19 10:35:35 2000 +0200
+++ b/HierarchicalItem.st Tue Sep 19 10:45:49 2000 +0200
@@ -682,6 +682,16 @@
super changed:what with:anArgument
!
+fontChanged
+ "called if the font has changed
+ "
+ width := height := nil.
+
+ children size ~~ 0 ifTrue:[
+ children do:[:el| el fontChanged ].
+ ].
+!
+
hierarchyChanged
"hierarchy changed; optimize redrawing
"
@@ -1547,5 +1557,5 @@
!HierarchicalItem class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.24 2000-09-06 12:41:59 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.25 2000-09-19 08:45:05 martin Exp $'
! !