--- a/HierarchicalFileList.st Wed Jun 11 10:33:27 2003 +0200
+++ b/HierarchicalFileList.st Fri Jun 13 12:57:54 2003 +0200
@@ -1043,7 +1043,7 @@
super canExpand ifTrue:[^ true].
"/ in case we are fetching the subdirectory
self isFetchingChildrenInfo ifTrue:[
-self halt.
+"/self halt.
].
^ false
@@ -1237,7 +1237,7 @@
!HierarchicalFileList class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalFileList.st,v 1.47 2003-05-14 11:10:47 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalFileList.st,v 1.48 2003-06-13 10:57:54 penk Exp $'
! !
HierarchicalFileList::Directory initialize!