--- a/DirectoryTreeBrowser.st Wed Nov 26 18:37:33 2003 +0100
+++ b/DirectoryTreeBrowser.st Thu Nov 27 13:39:33 2003 +0100
@@ -747,13 +747,13 @@
self selectFiles:selectFiles.
"/ cg: why was this done
-false ifTrue:[
- self selectedItems do:[:item|
- (item isDirectory and:[item isExpanded not]) ifTrue:[
- item enforcedExpand "/ expand.
- ]
- ].
-].
+"/false ifTrue:[
+"/ self selectedItems do:[:item|
+"/ (item isDirectory and:[item isExpanded not]) ifTrue:[
+"/ item enforcedExpand "/ expand.
+"/ ]
+"/ ].
+"/].
^ self
].
!
@@ -1302,5 +1302,5 @@
!DirectoryTreeBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.80 2003-11-24 20:04:04 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.81 2003-11-27 12:39:33 penk Exp $'
! !