#REFACTORING by exept
authorClaus Gittinger <cg@exept.de>
Sun, 05 Jan 2020 17:28:56 +0100
changeset 19399 d9c84d98a5e4
parent 19398 4a19cab055e5
child 19400 18fcb6e37df2
#REFACTORING by exept class: FindFileApplication changed: #doFindFileNamed:directories:nameMatch:contentsMatch:in:
FindFileApplication.st
--- a/FindFileApplication.st	Sun Jan 05 17:28:45 2020 +0100
+++ b/FindFileApplication.st	Sun Jan 05 17:28:56 2020 +0100
@@ -2008,7 +2008,7 @@
 
     [
         directoryContents := dir directoryContents.
-    ] on:FileStream openErrorSignal do:[:ex|
+    ] on:OpenError do:[:ex|
         self showUnreadableFilesAndDirectoriesHolder value ifTrue:[
             list add:((ex pathName , ' -> ' , ex description) withColor:Color darkRed).
         ].