--- a/HierarchicalFileList.st	Tue Apr 05 15:49:55 2005 +0200
+++ b/HierarchicalFileList.st	Tue Apr 05 16:33:12 2005 +0200
@@ -312,7 +312,7 @@
             ]. 
             item monitoringCycle
         ].
-        Processor yield.
+        "/ Processor yield.
         item  := self at:index ifAbsent:nil.
         index := index + 1.
     ].
@@ -959,7 +959,7 @@
 
     hasChildren := DirectoryContents directoryNamed:fileName detect:(self model matchBlock).
     self knownToHaveChildren:hasChildren.
-    self assert:children isNil.
+    "/ self assert:children isNil.
 
     (children isNil and:[info notNil]) ifTrue:[
         "setup modification time to suppress monitorCycle"
@@ -1267,7 +1267,7 @@
 !HierarchicalFileList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalFileList.st,v 1.55 2005-04-05 13:49:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalFileList.st,v 1.56 2005-04-05 14:33:12 cg Exp $'
 ! !
 
 HierarchicalFileList::Directory initialize!