--- a/ImageReader.st	Thu Jun 27 15:32:39 2019 +0200
+++ b/ImageReader.st	Fri Jun 28 09:03:32 2019 +0200
@@ -2713,7 +2713,7 @@
 
     |errorString|
 
-    errorString := self class name , ' [error]: ' , (aMessage bindWith:argument).
+    errorString := self className , ' [error]: ' , (aMessage bindWith:argument).
     inStream isFileStream ifTrue:[
         errorString := errorString , Character cr, '[in "' , inStream pathName , '"]'
     ].
@@ -2722,6 +2722,7 @@
     ^ nil
 
     "Created: / 29-08-2017 / 23:00:37 / cg"
+    "Modified: / 28-06-2019 / 09:02:57 / Claus Gittinger"
 ! !
 
 !ImageReader methodsFor:'i/o support'!