--- a/DirectoryContents.st	Tue Mar 24 11:09:20 2020 +0100
+++ b/DirectoryContents.st	Fri Apr 03 18:50:48 2020 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1997 by eXept Software AG
               All Rights Reserved
@@ -554,7 +552,7 @@
                 ].
                 isReadable := true.
             ].
-        ] on:(OpenError , StreamError) do:[:ex | isReadable := false. ].
+        ] on:StreamError do:[:ex | isReadable := false. ].
     ] ensure:[
         stream notNil ifTrue:[
             stream close
@@ -566,6 +564,8 @@
     contents sort:[:a :b | a nameString < b nameString ].
     contents := contents asArray.
     timeStamp := time.
+
+    "Modified: / 03-04-2020 / 18:50:11 / Stefan Vogel"
 ! !
 
 !DirectoryContents methodsFor:'obsolete'!