# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1475706471 -7200
# Node ID 61c7ba68f70c1de8796950aaa25397d785c6ddde
# Parent  fad3f845fc502010a771ddb120c78540d903b349
#OTHER by cg
class: DirectoryContentsBrowser
changed: #update:with:from:
care for file being removed

diff -r fad3f845fc50 -r 61c7ba68f70c DirectoryContentsBrowser.st
--- a/DirectoryContentsBrowser.st	Thu Oct 06 00:26:38 2016 +0200
+++ b/DirectoryContentsBrowser.st	Thu Oct 06 00:27:51 2016 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2002 by eXept Software AG
               All Rights Reserved
@@ -1538,9 +1536,12 @@
     ].             
     changedObject == self selectionInFileList ifTrue:[
         (changedObject value ? #()) do:[:eachSelectedItem |
+            |fn|
+            
             (eachSelectedItem modificationTime notNil
-              and:[ eachSelectedItem fileName notNil
-              and:[ eachSelectedItem fileName modificationTime > eachSelectedItem modificationTime ]]
+              and:[ (fn := eachSelectedItem fileName) notNil
+              and:[ fn exists
+              and:[ fn modificationTime > eachSelectedItem modificationTime ]]]
             ) ifTrue:[
                 "/ the file was modified in the meantime.
                 "/ flush its info.