avoid the \"return to original directory when filter changes\"
bug in the fileDialog.
This was caused by the monitoringCycle beeing \"superclever\"
by doing a collapse-expand instead of doing the \"real thing\".
The collapse resulted in a lost selection, which made fileDialog
return to the default (current) directory.
--- 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!