--- a/AbstractFileBrowser.st	Sat Apr 05 16:05:22 2003 +0200
+++ b/AbstractFileBrowser.st	Sat Apr 05 16:13:44 2003 +0200
@@ -2442,8 +2442,8 @@
 !
 
 updateAndSelect:aColOfFiles
-
     DirectoryContents flushCachedDirectoryFor:(self getBestDirectory).
+
     self applicationNamed:#DirectoryContentsBrowser do:[:appl | appl doUpdate].
     self applicationNamed:#DirectoryTreeBrowser     do:[:appl | appl doUpdate].
     
@@ -6109,5 +6109,5 @@
 !AbstractFileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.132 2003-04-05 14:05:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.133 2003-04-05 14:13:44 cg Exp $'
 ! !

--- a/DirectoryContentsBrowser.st	Sat Apr 05 16:05:22 2003 +0200
+++ b/DirectoryContentsBrowser.st	Sat Apr 05 16:13:44 2003 +0200
@@ -982,6 +982,13 @@
 doUpdate
 "/    DirectoryContents flushCache.
     self wakeUpForDirectoryContentsChanged.
+
+    directory notNil ifTrue:[
+        self flushRememberedDiskUsageInfoFor:directory.
+    ] ifFalse:[
+        self flushRememberedDiskUsageInfo.
+    ].
+    self startDiskUsageInfoProcess.
 !
 
 doubleClickedAt:anItemIndex
@@ -2166,6 +2173,17 @@
     diskUsageInfo := nil.
 !
 
+flushRememberedDiskUsageInfoFor:aDirectory
+    |dirPath keysToRemove|
+
+    dirPath := aDirectory pathName.
+    keysToRemove := diskUsageInfo keys 
+                        select:[:key |
+                            key startsWith:dirPath
+                        ].
+    diskUsageInfo removeAllKeys:keysToRemove.
+!
+
 isDiskUsageInfoStillValid:infoForDirectory for:aDirectoryPath
     |diskUsageRememberTime infoTimestamp infoKiloBytes infoMegaBytes|
 
@@ -2790,5 +2808,5 @@
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.98 2003-04-05 14:05:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.99 2003-04-05 14:13:38 cg Exp $'
 ! !

--- a/FileBrowserV2.st	Sat Apr 05 16:05:22 2003 +0200
+++ b/FileBrowserV2.st	Sat Apr 05 16:13:44 2003 +0200
@@ -1035,6 +1035,7 @@
                #(#MenuItem
                   #label: 'Update'
                   #translateLabel: true
+                  #itemValue: #updateCurrentDirectory
                 )
                )
               nil
@@ -1741,7 +1742,7 @@
 !FileBrowserV2 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.80 2003-04-02 22:42:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.81 2003-04-05 14:13:40 cg Exp $'
 ! !
 
 FileBrowserV2 initialize!