--- a/HierarchicalItem.st	Sat Sep 28 08:20:29 2002 +0200
+++ b/HierarchicalItem.st	Sat Sep 28 08:24:24 2002 +0200
@@ -746,6 +746,8 @@
             ].
         ].
         why := what
+    ] ifFalse:[
+        why := #redraw
     ].
     (model := self model) notNil ifTrue:[
         model itemChanged:why with:anArgument from:self
@@ -1758,5 +1760,5 @@
 !HierarchicalItem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.41 2002-09-19 09:40:27 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.42 2002-09-28 06:24:24 ca Exp $'
 ! !