--- a/DirectoryContentsBrowser.st	Tue Nov 19 15:43:12 2002 +0100
+++ b/DirectoryContentsBrowser.st	Tue Nov 19 15:44:10 2002 +0100
@@ -2565,7 +2565,7 @@
                     modificationTime := directory modificationTime.
                     [directory notNil and:[oldModificationTime = directory modificationTime]] whileTrue:[
                         Processor yield.
-                        Delay waitForSeconds:1.0
+                        Delay waitForSeconds:5
                     ].
                 ].
                 self wakeUpForDirectoryContentsChanged.
@@ -2759,5 +2759,5 @@
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.55 2002-11-18 10:09:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.56 2002-11-19 14:43:42 cg Exp $'
 ! !