--- a/DirectoryContents.st	Wed Sep 14 07:09:56 2016 +0200
+++ b/DirectoryContents.st	Tue Sep 20 11:51:13 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1997 by eXept Software AG
               All Rights Reserved
@@ -320,7 +322,7 @@
                         ^ true
                     ]
                 ].
-            ] on:FileStream openErrorSignal do:[:ex|
+            ] on:(FileStream openErrorSignal, StreamIOError) do:[:ex|
                 isReadable := false.
             ].
         ].
@@ -534,7 +536,7 @@
                 ].
                 isReadable := true.
             ].
-        ] on:FileStream openErrorSignal do:[:ex | isReadable := false. ].
+        ] on:(FileStream openErrorSignal , StreamError) do:[:ex | isReadable := false. ].
     ] ensure:[
         stream notNil ifTrue:[
             stream close