--- a/HierarchicalFileList.st	Tue Mar 21 19:15:35 2006 +0100
+++ b/HierarchicalFileList.st	Tue Mar 21 20:59:55 2006 +0100
@@ -1202,23 +1202,15 @@
                 anItem parent:self.
             ].
         ].
-        "/ 12 is hardcoded !!!!!!!!
+
+        unusedDict do:[:el| self remove:el ].
 
-        (unusedDict size + addedItems size) > 12 ifTrue:[
-            "/ generate two nofifications: collapse and expand
-            self collapse.
-            children := mergedList.
-            self expand.
-        ] ifFalse:[
-            unusedDict do:[:el| self remove:el ].
-
-            addedItems notEmpty ifTrue:[
-                self addAll:addedItems
-            ].
-            "/ children order changed test
-            children := mergedList.
-            self childrenOrderChanged.
+        addedItems notEmpty ifTrue:[
+            self addAll:addedItems
         ].
+        "/ children order changed test
+        children := mergedList.
+        self childrenOrderChanged.
     ].
 !
 
@@ -1252,7 +1244,7 @@
 !HierarchicalFileList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalFileList.st,v 1.60 2006-03-13 15:55:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalFileList.st,v 1.61 2006-03-21 19:59:55 cg Exp $'
 ! !
 
 HierarchicalFileList::Directory initialize!