--- a/DirectoryStream.st	Tue Mar 31 11:38:32 2020 +0200
+++ b/DirectoryStream.st	Fri Apr 03 19:59:40 2020 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -709,7 +707,7 @@
         osPathname isNil ifTrue:[
             "UNIX: does not automatically provide the first entry"
 
-            (StreamError,StreamIOError) handle:[:ex |
+            StreamError handle:[:ex |
                 self close.
                 ex reject.
             ] do:[
@@ -718,7 +716,7 @@
         ] ifFalse:[
             "Windows already provides the first entry's info"
 
-            readAheadEntry := OperatingSystem
+            readAheadEntry := Win32OperatingSystem
                 linkInfoFor:osPathname
                 fileSize:fileSize
                 fileAttributes:osFileAttributes
@@ -740,8 +738,8 @@
     ^ nil
 
     "Modified: / 09-04-2018 / 19:03:18 / stefan"
-    "Modified: / 22-11-2018 / 15:49:37 / Stefan Vogel"
     "Modified: / 29-05-2019 / 11:32:47 / Claus Gittinger"
+    "Modified: / 01-04-2020 / 14:22:44 / Stefan Vogel"
 !
 
 reOpen