--- a/DirectoryContentsBrowser.st	Mon Oct 28 09:58:31 2002 +0100
+++ b/DirectoryContentsBrowser.st	Mon Oct 28 10:11:50 2002 +0100
@@ -1723,8 +1723,8 @@
         desc := self findNextVisibleItemFor:[:n| n hasBeenModified ].
         
         desc notNil ifTrue:[
+            self updateChangesFor:desc.
             contentsBrowser invalidateVisibleRow:desc.
-            self updateChangesFor:desc.
             ^ true.
         ].
         "/ update icon for visible items by suffix
@@ -2079,6 +2079,9 @@
     preview := nil.
     owner := nil.
     group := nil.
+    iconKey := nil.
+    mimeTypeForContents := nil.
+    mimeType := nil.
 ! !
 
 !DirectoryContentsBrowser::DirectoryContentsItem methodsFor:'change queries'!
@@ -2739,5 +2742,5 @@
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.40 2002-10-28 08:58:31 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.41 2002-10-28 09:11:50 penk Exp $'
 ! !