--- 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 $'
! !