ExternalStream.st
changeset 24383 fb67cbcafd72
parent 24045 031200ccf630
child 24507 446e2dcc1a3b
--- a/ExternalStream.st	Fri Jun 28 08:49:17 2019 +0200
+++ b/ExternalStream.st	Fri Jun 28 08:49:29 2019 +0200
@@ -2515,11 +2515,12 @@
     "report an error, that the stream is in binary mode"
 
     ^ InvalidModeError
-	raiseRequestWith:self
-	errorString:(self class name , ' is in binary mode')
-	"/ in:thisContext sender
-
-    "Modified: / 8.5.1999 / 20:12:43 / cg"
+        raiseRequestWith:self
+        errorString:(self className , ' is in binary mode')
+        "/ in:thisContext sender
+
+    "Modified: / 08-05-1999 / 20:12:43 / cg"
+    "Modified: / 28-06-2019 / 08:43:06 / Claus Gittinger"
 !
 
 errorNotBinary
@@ -2528,11 +2529,12 @@
     "report an error, that the stream is not in binary mode"
 
     ^ InvalidModeError
-	raiseRequestWith:self
-	errorString:(self class name , ' is not in binary mode')
-	"/ in:thisContext sender
-
-    "Modified: / 8.5.1999 / 20:12:40 / cg"
+        raiseRequestWith:self
+        errorString:(self className , ' is not in binary mode')
+        "/ in:thisContext sender
+
+    "Modified: / 08-05-1999 / 20:12:40 / cg"
+    "Modified: / 28-06-2019 / 08:43:11 / Claus Gittinger"
 !
 
 errorNotBuffered
@@ -2541,11 +2543,12 @@
     "report an error, that the stream is not in buffered mode"
 
     ^ StreamError
-	raiseRequestWith:self
-	errorString:(self class name , ' is unbuffered - operation not allowed')
-	"/ in:thisContext sender
-
-    "Modified: / 8.5.1999 / 20:12:36 / cg"
+        raiseRequestWith:self
+        errorString:(self className , ' is unbuffered - operation not allowed')
+        "/ in:thisContext sender
+
+    "Modified: / 08-05-1999 / 20:12:36 / cg"
+    "Modified: / 28-06-2019 / 08:43:14 / Claus Gittinger"
 !
 
 errorReadOnly
@@ -5229,11 +5232,12 @@
      sent after snapin to reopen streams.
      cannot reopen here since I am abstract and have no device knowledge"
 
-    self class name errorPrint. ' [warning]: automatic reOpen not supported - stream closed' errorPrintCR.
+    self className errorPrint. ' [warning]: automatic reOpen not supported - stream closed' errorPrintCR.
     handle := nil.
     self unregisterForFinalization.
 
-    "Modified: 10.1.1997 / 17:50:44 / cg"
+    "Modified: / 10-01-1997 / 17:50:44 / cg"
+    "Modified: / 28-06-2019 / 08:43:21 / Claus Gittinger"
 !
 
 setAccessor:what to:something