--- a/FileBrowser.st Wed Mar 01 21:43:17 2000 +0100
+++ b/FileBrowser.st Thu Mar 02 01:32:43 2000 +0100
@@ -5325,14 +5325,14 @@
|t|
OperatingSystem isMSDOSlike ifTrue:[
- "/ workaround: DOS has no diretory modifiation time ...
- self updateCurrentDirectory.
- ^ self
+ "/ workaround: DOS has no directory modifiation time ...
+ self updateCurrentDirectory.
+ ^ self
].
((t := currentDirectory modificationTime) isNil
or:[t > timeOfLastCheck]) ifTrue:[
- self updateCurrentDirectory
+ self updateCurrentDirectory
]
"Modified: / 16.9.1997 / 15:35:52 / stefan"
@@ -6596,7 +6596,7 @@
self stopUpdateProcess.
- timeOfLastCheck := AbsoluteTime now.
+ timeOfLastCheck := currentDirectory modificationTime.
files := currentDirectory asFilename fullDirectoryContents.
@@ -7066,5 +7066,5 @@
!FileBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.365 2000-02-14 12:51:59 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.366 2000-03-02 00:32:43 cg Exp $'
! !