ClassDescription.st
changeset 25178 9d2bd628dbeb
parent 25000 369b2744a3ea
child 25295 7067a6ee0f20
--- a/ClassDescription.st	Sun Jan 05 17:27:00 2020 +0100
+++ b/ClassDescription.st	Sun Jan 05 17:29:15 2020 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1993 by Claus Gittinger
 	      All Rights Reserved
@@ -1666,7 +1668,7 @@
 
     [
         changesStream := streamType fileNamed:fileName.
-    ] on:FileStream openErrorSignal do:[:ex|
+    ] on:OpenError do:[:ex|
         self warn:('%2\\Cannot create/update the changes file "%1"\please check the path and/or permissions' withCRs
                    bindWith:fileName with:ex description).
         ^ nil
@@ -2272,7 +2274,7 @@
 
     [
         aStream := fileName newReadWriteStream.
-    ] on:FileStream openErrorSignal do:[:ex|
+    ] on:OpenError do:[:ex|
         ^ FileOutErrorSignal
                 raiseRequestWith:fileName name
                 errorString:(' - cannot create file:', fileName name)
@@ -2447,7 +2449,7 @@
 
         [
             aStream := fileName newReadWriteStream.
-        ] on:FileStream openErrorSignal do:[:ex|
+        ] on:OpenError do:[:ex|
             ^ FileOutErrorSignal
                     raiseRequestWith:fileName name
                     errorString:(' - cannot create file:', fileName name)