#REFACTORING by exept
class: DirectoryContents
changed: #directory:
class: DirectoryContents class
changed: #directoryNamed:detect:onOpenErrorDo:
--- a/DirectoryContents.st Sat Jan 04 18:04:53 2020 +0100
+++ b/DirectoryContents.st Sun Jan 05 17:26:45 2020 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 1997 by eXept Software AG
All Rights Reserved
@@ -338,7 +340,7 @@
^ true
]
].
- ] on:(FileStream openErrorSignal, StreamIOError) do:[:ex|
+ ] on:(OpenError, StreamIOError) do:[:ex|
isReadable := false.
].
].
@@ -552,7 +554,7 @@
].
isReadable := true.
].
- ] on:(FileStream openErrorSignal , StreamError) do:[:ex | isReadable := false. ].
+ ] on:(OpenError , StreamError) do:[:ex | isReadable := false. ].
] ensure:[
stream notNil ifTrue:[
stream close