--- a/DirectoryContentsBrowser.st Thu Sep 13 14:36:55 2018 +0200
+++ b/DirectoryContentsBrowser.st Thu Sep 13 14:37:20 2018 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 2002 by eXept Software AG
All Rights Reserved
@@ -1560,15 +1558,17 @@
(changedObject value ? #()) do:[:eachSelectedItem |
|fn|
- (eachSelectedItem modificationTime notNil
- and:[ (fn := eachSelectedItem fileName) notNil
- and:[ fn exists
- and:[ fn modificationTime > eachSelectedItem modificationTime ]]]
- ) ifTrue:[
- "/ the file was modified in the meantime.
- "/ flush its info.
- eachSelectedItem resetItem
- ].
+ eachSelectedItem notNil ifTrue:[
+ (eachSelectedItem modificationTime notNil
+ and:[ (fn := eachSelectedItem fileName) notNil
+ and:[ fn exists
+ and:[ fn modificationTime > eachSelectedItem modificationTime ]]]
+ ) ifTrue:[
+ "/ the file was modified in the meantime.
+ "/ flush its info.
+ eachSelectedItem resetItem
+ ].
+ ].
].
self updateToExternFileHolderLock doIfUnLocked:[
@@ -1610,6 +1610,8 @@
].
super update:something with:aParameter from:changedObject
+
+ "Modified: / 13-09-2018 / 12:05:02 / Claus Gittinger"
!
updateListAfterDelete:collectionOfFiles